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WE UNLEASH THE WORLDS 

MOST POWERrUL 
GRAPHICS TECHNOIOGY. 

. All words. 

g 

msBBm 



To look at Infocom stories, 
you'd say they're all prose. No 
graphics. Ah, but there's more 
than meets your eyes. 

We draw our graphics from 
the limitless imagery of your 
imagination— a 
technology so pow- 
erful, it makes com- 
puter screen pic- 
tures look like 





graffiti 
by com- 
parison. 
And 
no one 
knows how to unleash your 
imagination like Infocom. With 
thrilling plots. Unpredictable 
situations. And original puzzles 
calculated to drive you out of 
your skull. 



Step up to Infocom. All words. 
No graffiti. The secret ] 
reaches of your imag- 
ination are beckoning. 

It's time to open 
your mind's eye. 

inpocoiK 

INTERACTIVE FICTION SOFTWARE 

Infocom's interactive fiction is available for a 

wide variety of personal computers. 
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EDITORIAL 



There are going to be some exhausted 
programmers around ANALOG Com- 
puting. 

Constant exposure to emissions from 
monochrome and color monitors will 
have turned their eyes into silvery orbs, 
like Yul Brymier's in Westvvoi'Jd. Their 
fingertips will have gone numb from 
pressing keytops and mouse buttons. 
Their ears will be attuned only to the si- 
ren song of computerized beeps and 
hoops. For them, human voices will fade 
into white noise, then nothingness. 

They will derive their nom'ishment — 
if any — from the contents of paper bags 
and styrofoam cups. They will go home 
only to set the timers on their videotape 
recorders for "Miami Vice" and "Hill 
Street Blues." Then they will return, 
zombie-like, to the altar of silicon chips 
and electrical impulses. 

The fanciful description above has 
more basis in reality than one might as- 
sume. What will have driven these men 
to such a sorry state? 

Easy answer. ANALOG Computing 
has just received an Atari 520 ST, a 
10-megabyte hard disk, two monitors 
(one RGB, the other monochrome), two 
SVa-inch disk drives, a C compiler, an 
assembler, the GEVI operating systeiii, 
and full technicEil documentation. ANA- 
LOG Computing is among the handful 
of companies to receive the new Atari 
ST computers at this early date. 

Several weeks ago, an Atari official 
asked us to state, in writing, why tlris 



magazine needed an ST, related hard- 
ware and software. There were a limit- 
ed number of ST development packages 
available. Why did we deserve an ST 
more than some other companies wait- 
ing to do software development, vital to 
the success of the machine? 

Lest some of our readers get annoyed 
at what seems to be Atai'i's cavalier treat- 
ment of us, let me state that the ques- 
tion was a formality. Unlike the mono- 
lithic old Atari , the new Atari Corp. has 
made a genuine effort to keep close tabs 
on Atari user groups and third-party 
companies. They're also aware of the 
support that computer magazines give 
the Atari community, machine-specific 
magazines in general, ANALOG Com- 
puting in particular. 

Nevertheless, we drowned the poor 
Atari employee with a deluge of ration- 
al reasons (three, actually) for sending 
the ST package to us. 

First, in our four years of existence, 
we've probably published more Atari 
computer programs than any other com- 
pany in the world, Atari included. Our 
status as a software developer stems 
from our readers' demands for us to de- 
liver the finest Atari programs of any 
computer magazine. 

Second, the sooner we can get our 
hands on the ST, the sooner our readers 
can learn — as we learn — about all the 
details of the machine. 

The fascination with this new com- 
puter won't be evidenced only in our 
programmers, however. The entire staff 



of ANALOG Computing will be work- 
ing with it, testing, playing, determin- 
ing how useful Atari's new ST line is 
going to be, both to the hardened hacker 
and the neophyte purchaser. 

In the months ahead, we intend to 
dissect the ST, its hardware, operating 
system (including GEM) and its soft- 
ware. Technical editor Tony Messina is 
prepming an in-depth look at the 68001) 
chip, the brain of the ST. 

We also plan on being one of the first 
computer magazines to have type-in 
programs for them. And, in the not-too- 
distant future, we hope to get a look at 
Atari's mysterious 32-bit macliine. (Ac- 
cording to Leonard Tramiel. this ma- 
chine will probably not be shown at the 
Manover, West Germany computer show, 
histead, it should make an appearance 
at the June CES in Chicago.) 

All this, plus our regular features and 
articles covering Atari's current 8-bit 
line (and do we have some things to 
show you)! 

Oh, I almo.st forgot. The third reason 
we had to get an Atari ST? 

If we hadn't, the publishers and (gasp) 
managing editor would probably soon 
be discovered dangling from lengths of 
ribbon cable, mui'dered at the rosin-core- 
solder-spattered hands of our program- 
mers. 



Jon 
Mai 



"V. Bell 




aging Editor 
ANALOG Computing 
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Q : What's 69% Faster Than a Commodore 64 ? 
What's 38% Faster Than an IBM" PC? 
What's 68% Faster Than an IBM PCjr ? 
What's 54% Faster Than Applesoft ? 



A: 





BASIC XL 



-^--s^r^e, 




^2l£5Sa££Joob 




The answer is BASIC XL. 

Don't take our word for it! Try the benchmark test in January '85 issue 
of Compute!'^ magazine, on any of these computers with their Basic's. 
Time it yourself Then try it on an Atari* computer with BASIC XL. 

and the Price is NOW ONLY $79.00 



*Just ask us for complete details, as well as other benchmark results. 



sss 



Optimized Systems Software, Inc. 

1221BKentwood Avenue, San Jose, California 951 29 (408)446-3099 



IBM rc, PCjr are trademarks of IBM Corp.; Applesoft is a Irodemark of Apple Computer Inc.; Commodore 6-1 is a trademark of ComniDdore Business Machines; Compute! in u trademark of ABC Corp; Atari iH a trademark of Atari Corporation. 
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Using your printer 
as a screen on the XL. 

Some clarification is in order for the 
reader looking for a POKE command to 
use his printer as display screen. 

Scott Sheck's solution to the problem 
(issue 29) doesn't work on the XL mod- 
els, due to those well-known changes in 
the OS. 

This solution will work on any Atari, 
since it checks the printer handler table 
for the correct address to use. 

To send everything to the printer in- 
stead of the screen: 

S1=PEEKC838> :52=PEEKC8391 
POKE 858, PEEK (58422 J : POKE 
839, PEEK (58423> 

To return things to normal: 

POKE 838,51:P0KE 839,52 

Sincerely, 
Clinton Branch 
Merritt Island, FL 

MicroDOS XL fix. 

I am writing to bring to your attention 
a problem in MicroDOS XL, published 
in issue 28. 

After carefully typing in the source 
code and proofreading it (three times!), 
I finally got it to work — almost. I found 
that, when using DOS XL 2.30 (OSS) in 
double density, only the first eight file- 
names would be listed. 

I discussed the problem with a fellow 
Atari enthusiast, Vlad Ruzicka. After a 
few hours of examining the code and the 
DOS XL manual, he came up with the 
solution. 

Page 145 states that "only eight file 
directories are stored per sector, even on 
double density diskettes." Walter Lord's 
program uses the variable SECLG to flag 
single or double density operation. On 
page 21 of the listing, in the middle of 
the second column. Lord uses SECLG 
when reading the directory. 



The code segment, and the fix, are as 
follows: 

NEXOIR LDA BFPNTR 
CLC 

ADC tt$ie 

STA BFPNTR 

CHP SECLG 

ichanqe the above line 
;of code to CMP tt$80 

BEQ CONTie 
BNE CONTll 

Now the program will look at more 
than just the first sector of a double den- 
sity DOS XL disk. 

I wish to thank you for an excellent 
Atari magazine. You seem to come out 
with utility programs or product reviews 
at about the same month that I need the 
information . . . uncanny. Keep up the 
good work! 

Bill Toft 

Toronto, Ontario, Canada 



This fix can be incorporaied into the 
BASIC version of the program by chang- 
ing the foUowing two h'nes of code. 

100 GOTO 40 

1090 DATA 46D0e2Ee47C8Ceie 

D0EEA54ei8691D85469002E647 

A5441869108544C980EAF0B0D0 

BAB9486199C40288D0F7A9 , 362 

Because tJie revised BASIC program 
H'ill no longer check for correct DATA 
statements, it is imperative that you be 
sure that the original program worked 
properly. — Ed. 

Balldrop legalization. 

I have been buying your magazine 
since issue 16, and camiot think of a bet- 
ter way for any Atari owner to spend $3. 

The machine language routine includ- 
ed in issue 22 for use with Balldrop 
won't work on the XL models, because 
of an illegal call to EOUTCH ($F6A4). 



Please note that this has been moved to 
62128 ($F20B) on the XLs. 

The following lines will correct the 
problem. 

80 IF TTLO14018 THEM ? "E 

RROR IH DATA LIHE5":ST0P 

1020 DATA 85,165,204,133,8 

4 , 169 , 20 , 32 , 176 , 242 , 165 , 20 

3,133,85,165,204 

1060 DATA 32,176,242,230,2 

04,165,204,201,20,208,168, 

96 

Wayne Toups 
River Ridge, LA 

Aw, shucks department. 

There have been many occasions in 
the past when I felt that 1 should jot a 
few notes down on paper and send them 
to you, in order to express my delight 
at the content and quality of your maga- 
zine. After renewing my (lapsed) sub- 
scription and receiving the December, 
January and February (issues 25, 26 and 
27) disks and magazines, I just had to 
write. 

Incredible! Talk about being tuned to 
your market. Great utilities and games 
in every issue, interesting articles and 
features make absorbing reading, with 
the added bonus for the disk/tape sub- 
scribers to quickly run and experiment 
with the programs. 

In particular, I would like to mention 
the MicroCheck program featured in 
February. First class! I cannot wait for 
the March issue to complete the program 
suite. 

You really are a tmied-in bmich of 
computer journalists over there, and here 
is one U.K. enthusiast who appreciates 
what you ai-e succeeding in doing. Good 
luck! Keep it up! 

Charles Thomas 

Warwickshire, UK 
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Math Magic changes. 

We were very pleased to see the re- 
view of our program, Math Magic, in 
the Griffin's Lair column of your maga- 
zine. A few things have changed for 
Math Magic that we would like you to 
be aware of. 

First; Math Magic is now marketed 
by Texas Software and is no longer af- 
filiated with Blakmagic software. 

Second: Math Magic is now teacher 
certified by the National Educational As- 
sociation. 

Third: Math Magic has new docu- 
mentation. 

Sincerely, 

Larry Hall, Director of Marketing 

Texas Software, 10165 Calder 

Beaumont, TX 77706 

Due to a priniing erroi', the photos of 
Math Mileage and Math Magic were 
switched in the Griffin's Lair column of 
issue 29. —Ed. 

Catching a runaway cursor. 

First, I want to tell you that I really 
enjoy your magazine! I've learned quite 
a bit from your articles and programs. 

Now, I would like to share something 
with your readers. I own an Atari 400 
with 64K and replaced the original key- 
board with an INHOME B-key The key- 
board worked find for about a year, then 
I started having problems with a run- 
away cursor. 

The cursor would act as if I was hold- 
ing the space bar down, and wouldn't 
stop until I tapped on the key a few 
times. As you can imagine, this became 
very frustrating. I took the computer into 
the computer repair class whore I work, 
and this is what they found. 

The keyboard is basically a PC board 
with switches for keys attached. All of 
the copper circuit traces are on the bot- 
tom, except for the space bar, whose cir- 



cuits are on the top of the board. The 
top of the board was painted light brown 
to match the color of the computer, and 
the paint also acted as an insulator. 

Through extensive use (typing in pro- 
grams from ANALOG Computing), the 
small metal bar under the space key 
wore the paint away, allowing a short to 
develop between the metal rod and the 
circuit trace. So, the computer would 
read this as the key being depressed and 
held down. 

To fix the problem, they had to un- 
solder and remove one of the tabs hold- 
ing the metal rod. Then they placed a 
strip of insulating tape where the abra- 
sion had taken place (protecting the cir- 
cuit traces) and resoldered the tab, thus 
stopping the runaway cursor. 

I hope this will help anyone who has 
experienced the same problem. 

Richard C. Smith 

Riverside, CA 



turbo-4th 



The ideal computer language 
for Games & Graphics. 

By the author of 
Team FORTH 

• Source compatible with 
Team FORTH and fig-FORTH 

• Runs 2 to 4 x 's faster 

• Great 96p manual (source 
listings) 

• On disk for any 32k -i- Atari 

• $27.00 postpaid (CA add 
sales tax) 

send to: turbo-Ath 

884 Cape Diamond Drive 
San Jose, CA 95133 
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LEARN TO PROGRAM 

GRAPHICS. GAMES & SOUND EFFECTS! 



NOW SOLD DIRECTLY TO YOU 
AT DISTRIBUTOR PRICES 

LIMITED EDITION BOOK MANUSCRIPTS 

Due to a publisher's change of plans, we olfer you two books we 
have written, in Iheir manuscript form. Each comes to you as a 
limited, hand numbered edition of over 200 pages, with a compliti 
dlik full of softwiri examples, edilors, and assembly language 
lools useable by anyone. They are written using BASIC, but the 
material is easily translated to other languages. 
ARCADE STYLE GRAPHICS: Many books teach you how to draw a 
few circles or charts. In this book we create a complete, animated 
picture, step by step Starting with basic concepts, sucli as using 
keyboard characters for your graphics, the program adds new 
ideas 10 the screen one at a lime, with many examples The disk in- 
cluded has lools & editors for character sets and drawing back- 
grounds. The only book on graphics you need ever buy. S39.9S 
BASIC GAME DESIGN: A lascinalmg and complete look at how a 
designer creates an arcade game, step by step, IN BASIC You will 
build your own version o( SPACE INVADERS, using the ideas ex- 
plained in the lirst book and adding Animation, Sound Effects. 
Game Logic, Scoring, and Special Effects The final game looks 
and plays jusi like the original tn the arcades The full disk of soft- 
ware includes all examples and editors typed in for you $39.95 
THE MASTER MEMORY MAP: Over 65,000 copies of this line 
reference have been sold This book has EVERYTHING you could 
want to know about the machine with 50 sample programs you can 
type in II goes through each memory location, tells you what \\ 
does, and what you can change to control the machine yourself, 
even [( you don't program Specify ATARI, C-64, VIC 20, or IBM 
PC, J15.95, ATARI 40 page reference version costs $6.95, All of 
the examples already typed m on a disk costs $9.95. 

TRICKY TUTORIALS (tm) TO HELP YOU PROGRAM 
Each program m this series comes with a disk [32K) or tape ( 16K1, 
and a manual up to 66 pages They are written in a friendly manner 
lo be used by beginners or experts alike Over 50,000 sold wilh 
many high rated reviews' 

#1 DISPLAY LISTS-Learn lo create your own graphics & text 
modes $9.95. #2 SCROLLING-Explains how lo move the 
screen you see over maps ol graphics or text $9.95. W PAGE 
FLIPPING— Change Ihe enlire screen instantly to another display 
picture $9.95. jTA BEGINNING ANIMATION-Learn to create the 
illusion of movement using simple shapes $9,95, #5 PLAYER 
MISSILE GRAPHICS-Create your own PACMAN type game while 
learning about Collisions, backgrounds. Players, scoring, and 
more Our best seller $14.95, #6 SOUND & MUSIC-learn a 
simple way to write music and sound effects on your computer 
$14.95. #7 DISK UTILITIES-Seven disk tools. FORMATER IN- 
SPECTOR. AUTORUN SYS MAKER, RPM CHECKER. MENU 
MAKER DIRECTORY PRINTER & FILES TUTORIAL $14.95. #8 

OUR NEUEST PfftCHHJCTS 

FMm COnPUTERS HRDE SinPLE! 

CHARACTER GflAPHICS-Change letter shapes into anything you 
wish Includes an editor that makes creating and animating the 
shapes easy, and a linker thai actually writes BASIC code A com- 
plete game is included as an example $14.95. #9 GTIA 
GRAPHICS—Use graphics modes 9 to 11 to create 3-D shapes 
place 16 colors on ihe screen at once, and even digitize pictures 
using these new modes inciuaes a 9 color picture editor similar to 
the "Painter ■ programs and "Pads" thai others sell $14,95. 
#10 SOUND EFFECTS-30 simple sound eltecis like lazers and 
bombs, an effects editor, expanaiion how to combine sounds and 
graphics, and 16 bil sounds lor extended range $14.95. #11 
MEMORY MAP TUTORIAL-Examples how lo conlrol the cursor 
text windows, user keys, joysticks and paddles, labs, inverse 
video, upside down lettering, break key protection and 25 more 
$14.95. nZ THE S.A.M. TUTOfllAL-Usmg your |oyslick. you 
can learn to make Software Aulomated Mouth sing, change Ihe 
sound of Ihe voice, add graphics, explore phonemes and even 
change mlleclions $14,95. #13 BASIC TOOLS-lnciudes Ihe 
following lools that add themselves to Alan BASIC RENUMBER 
DELETE. IRACE. EXPAND lakes programs with many slalemenis 
per line and breaks them up to make Ihe program easy lo read. 
OUICKREF tells you the lines & numbers where all ot Ihe variables 
and constants are used LISJER prints out your piograms in- 
cluding all of the special characters that you see on the screen (like 
hearts and diamonds] $14.95 #14 ADVANCED PROGRAMMING 
TOOLS-Machine language loos we use lo write our commercial 
programs useable from BASIC or Assembly Tools for PLAYER 
MISSILE MOVEMENT, TIME DELAYS SOUND EFFECTS. PAGE 
FLIPPING. MEMORY MOVEMENT. SPECIAL CHARACTER FONTS 
and save FULL GRAPHICS SCREENS (1/ 10] in seconds DISK ON 
LY $14.95, #15 FANCY FOKTS-lncludes many sample fonls. 
an editor, and adds a new sel of sub roulmes ihal you can call lo 
create great displays Load Ihe loots you create mto your EPSON 
FX 80 or 100 computer, print out the tools on ANY printer as you 
create them $14.95. 

We also ofler 4 arcade games. 8 childrens educdiionai programs, 
and 9 others all priced under $15. for 16K TAPE oi 32K DISK! 
SEND A SELF ADDRESSED STAMPED ENVELOPE FOR A COM 
PLEIE ATARI CATALOG 



Moneyback guarantee If unsatisfied!! 
ORDER BY CHECK. VISA. M/C. OR C.O.D. 

I ADD $3.00 SHIPPING. UD $2.00 lor C.O.D OR 1S<fc FOREIGN 

COMPUTERS MADE SIMPLE! 

1974 Buck St.. Eugene. OR 97405 

(503) 344-2767 
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DUST PROBLEMS? 

Solve them with matching dust 
covers for computer, monitor, disl(, 
printer, and cassette! 

There are a lot of cheap 
dust covers, most made 
from clear static filled 
plastic. They just aren't 
attractive, especially in 
your home. And that is 
w/hy Bytes and Pieces _ 
built the best looking custom fitted dust 
covers available. Ours are hand sewn 
from a specially treated nylon. They're 
vi/ater and dust proof in a pleasing neutral 
color. Also available in beautiful leather- 
like Naugahyde for an extra $2.00 per 
cover. Here's the best news. ..they're 
available for the 400, 600, 600XL, 800, 
800XL, 1200XL, both recorders, both 
ATARI disk drives, as well as drives from 
RANA, PERCOM, INDUS, and TRACK. 
Plus, we make covers for most monitors 
and printers, just send us the 
measurements. Order today. 

NEW! ATARI 
PICTURE IMPROVER. 

IVIal(es the picture better on your 
monitor. Guaranteed. 

Here it is. We've built hundreds of these 
cables for the Commodore, and now 
we've discovered a way to make them 
work on your ATARI. Just plugs in. Your 
picture is sharper, clearer, and crisper. 
Guaranteed, of course. $24.95 

NEW FOR ATARI... 
THE COLOR SHARPENER! 

Another product designed for the Com- 
modore, and modified for your ATARI. It 
plugs into the din plug on the 800, but 
makes the picture on your TV better. 
Instantly. Makes a BIG difference on over 
75% of the TV's, a noticeable difference 
on another 15%. But if it doesn't help 
yours, or it you're not satisfied, just send 
it back for a full refund. Amazing! $18.95 



Computer dust covers 

@ $9.96 

Specify computer type: 

Disk drive dust covers 

@ $9.95 

Specify drive type: 

, Monitor dust covers 
@ $12.95 

Specify monitor type and 
measurements: 

Printer dust covers @ $12.95 
Specify printer type and 
measurements: 



Cassette dust covers @ $7.95 $ 
Specify cassette type: 



Picture Improver @ $24.95 

Color Stiarpener @ $18.95 

For Naugahyde covers, add 

$2.00 per cover 

Sfiipping & Handling 
5% Slate Tax Wl Residents only $ 

TOTAL $ 
n Check or f^oney Order enclosed 
□ Ctiarge to my VISA or MasterCard 



$ 

$ 2-50 



VISA* . 

MasterCard # 

Inner Bank # 

Expiration Date _ 



Signature 
SHIP TO; 

Name 

Address _ 

City 

State/Zip 



Bptes&Pieoes.Inc 

550 N. 68th Street • Wauwatosa, Wl 53213 
414/257-1214 



n 



READER COMMENT 



XL fix for Dragonlord. 

I have an Atari 800XL and, when I en- 
tered and ran the program Dragonlord 
(issue 29 of ANALOG Computing), I 
kept getting DIM errors. After a lot of 
trial and error with the program, I fig- 
ured that it might be because this pro- 
gram was written for the 800 and not the 
800XL. I proceeded to find a remedy for 
this. 

In Lines 10 and 20, preset N values ai-e 
the same as the number with N (exam- 
ple: N1 = 1,N2 = 2, etc.); I decided, rather 
than do this, I would try to use the num- 
bers as they are. 

Once I went through the whole pro- 
gram and changed all the N numbers to 
regular numbers by removing the N, the 
program ran very well on my BOtJXL. 

I am not sure if this is the way Mr. 
Walnum intended his program to work, 
but I would advise any XL owner to try 
this. 

L. Eugene Donie 

Harlem, GA 




Need sometliing inlerestmg lo do with thai left over 

hamburger? How about a dessert lor someone on a diet? 

The recipe you reed is only seconds away with: 

THE COMPUTER 
GOURMET 

The Computer Gourmet is your complete kitchen helper. 

Twelve servings too many! A quick keystroke and your 

serving size is adjusted to the number you need. Want a 

shopping list of ingredients? No problem! 

The Computer Gourmet even comes with its own complete 
set of recipes! (And its very easy to add your own ) 

Autoinate your kitctien with 
The Computer Gourmet 

Available on disk lor Atari'- computers (requires 48K). 
Send $29.95 plus 52.00 lor postage to: 

NEW HORIZONS SOFTWARE 

P.O. Box 180253 

Austin, Texas 78718 

Or, for more information, call (512) 445-1767. 



New Horizons 

Expanding Your Life 
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Contact us for information on ail our products lor Atari Computers. 
, Dealer inquiries invited. Atari is a trademark ol Aiarj, Inc. / 
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cojitiniied 



This seems lo be a /airly cojumon 
problem with (he BASIC (liaf is biiill 
into the XL computers, manifested in two 
ways. 

First, when you load a program on an 
XL machine b)' using tl:^e BASIC key- 
word LOAD or CLOAD, the bytes poinl- 
ing to the end of the program are up- 
dated incorrec/l\/ and 16 unusable bytes 
are faclced onio the end. 

Second, some o/ our programs assign 
constants to variables h'ke KO = 0, i^Cl = 1 . 
K2 = 2, etc. fiA'hich is a technique used 
to save space in RAM). When the pro- 
gram is finally run, you might find ihal 
these variables are not nt their assigned 
values. 

These tivo problems can be fixed sim- 
ply by LISTing (he pi'ograiri to a cassette 
or disk file, typing NEW to clear out the 
computer's memory, then using the EN- 
TER command to read the program 
back in. This corrected program may 
now be saved out. 

Disk me(hod: 

LOAD "D: PROGRAM" 

LIST "D:TEMP" 

NEH 

ENTER "OrTEMP" 

5ME "Di PROGRAM" 

Casselle method: 

CLOAD 

LIST "C:" 

NEH 

ENTER "C:" 

CSAUE 

This should clear up some problems 
Jor XL owners. — Ed. 



ASTRA 

Double Disk Drives 




INCLUDES DOS 

Big "D" Double Sided . $595.00 

2001 Two Drive $495.00 

1620 Two Drive $349.00 

1620 quantities are limited. 



ADD $10.00 DELIVERY 
MASTERCARD ; VISA 

THE PROGRAMIWERS WORKSHOP 

CALIFORNIA (714)796-6821 

OUTSIDE CA (800) 228-6821 
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ATARI® 820 or 822 PRINTER- $39.00 

With Cable and Paper Everything you Need! 



DISK DRIVES 

- New Special Edition 

$1 99.00 or $349.00 w/Happy 

- Reconditioned ATARI® 810 
$149.00 or $299.00 w/Happy 

• Happy® Compatible 

. 1 00% Software Compatible 
.120 Day Warranty 

• Most Durable & Serviceable 




MADE FROM ATARI* 810 BOARDS 
AND TANDON* MECHANISMS 



Everything for the ATARI Systems to Parts 



410 PROGRAM RECORDERS 
CASSETTE - $29.00 

• Star Raiders .Missle Command 

• Touch Typing •Time Wise 

• States & Capitals ^2 More Games 

All for $19.95 

800 Computer Boards 
Complete & Tested 

• Mother Board .CPU Board 

• Power Board • Ram Board 

• ROM Board 

All for $39.00 

- Numeric Keypads w/driver $19.95 

- Disks from $1 .00 each 

■ UK® LETTER PERFECT or DATA PERFECT 



San Jose Computer 

1844Almaden, Rd. UnitE 

San Jose, CA 951 25 

(408) 723-2025 




YOU CANT TELL 

A DISK DRIVE 

BY ITS COVER!! 




WITH A HAPPY ENHANCEMENT INSTALLED THESE ARE 
THE MOST POWERFUL DISK DRIVES FOR YOUR ATARI COMPUTER 

WARP SPEED SOFTWARE DISK READING AND WRITING 500% FASTER 

HAPPY BACKUP — Easy to use backup of even the most heavily protected disl<s 

HAPPY COMPACTOR — Combines 8 disks into 1 disk with a menu 

WARP SPEED DOS — Improved Atari DOS 2. OS with WARP SPEED reading & writing 

SECTOR COPIER — Whole disk read, write and verify in 105 seconds 

1050 ENHANCEMENT — Supports single, 1050 double, and true double density 

810 ENHANCEMENT — Supports single density 

SPECIAL SUGGESTED RETAIL PRICE: Get the HAPPY ENHANCEMENT 810 or 1050 version with the HAPPY BACKUP PROGRAIVI, 
plus the multi drive HAPPY BACKUP PROGRAM, plus the HAPPY COMPACTOR PROGRAM, plus the HAPPY DRIVE DOS, plus the 
HAPPY SECTOR COPY, all with WARP DRIVE SPEED, including our diagnostic, a $350.00 value for only $249.95, for a limited time only! 
Price includes shipping by air mail to U.S.A. and Canada. Foreign orders add $10.00 and send an international money order payable through a 
U.S.A. bank. California orders add $16.25 state sales tax. Cashiers check or money order for immediate shipment from stock. Personal checks require 
2-3 weeks to clear. Cash COD available by phone order and charges will be added. No credit card orders accepted. ENHANCEMENTS for other 
ATARI compatible drives coming soon, call for information. Specify 1050 or 810 ENHANCEMENT, all 1050s use the same ENHANCEMENT. 
Please specify -H model for all 810 disk drives purchased new after February 1982, call for help in 810 ENHANCEMENT model selection. Dealers 
now throughout the world, caO for the number of the dealer closest to you. ATARI is a registered trademark ot Atari Computer Inc. 



HAPPY COMPUTERS, INC. 



p. O. Box 1268 



Morgan Hill, California 95037 



(408) 779-3830 
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NEW PRODUCTS 



LINKWORD LANGUAGES BY ARTWORX 

The Linkword Language Series is made up 
of fom- programs, lessons in Spanish, German, 
French and Itahan. 

The cassette-based series uses a computer 
program and audio soundtrack to teach a 400- 
word vocabulary, grammar and pronunciation 
— all in about ten hours. 

The Linkword Language Series was devel- 
oped by Dr. Michael Gruneberg. 

The programs retail for $24.95 each from 
Artworx Software Company, 150 N. Main 
Street, Fairport, NY 14450 — (716) 425-2833 
or (800) 828-6573. 




OTHER NEWS 

The Video Title Editor creates titles, col- 
ored screens, leaders and messages, when 
used with your Atari computer and a VCR. 
An easy-to-use menu allows you to access 
over twenty different displays. 

$29.95 by Videowai-e, 19777 W. 12 Mile Rd., 
Ste. 180, Southfield, MI 49076 — (313) 626- 
7208. 

■ ■ ■ 

Tri Micro has reduced prices of their in- 
tegrated productivity software to $29.95/title. 

Some of the packages include: The Write 
File (word processor/database); Your Home 
Oifice (word processing/spreadsheet); and 
Plus Graph (complete business grapMcs pack- 
age). 

Contact Tri Micro, 14072 Stratton Way 
Santa Ana, CA 92705 — (714) 832-6707 

■ ■ ■ 

A new catalog from Dataproducts lists com- 
puter printer ribbons for over 200 types of 
printers, plus thermal paper, prinlwheels and 
other accessories. The 23-page catalog is 
available from Dataproducts Supplies at (818) 
887-8461 or 15250 Ventura Blvd., Ste. 310, 
Sherman Oaks, CA 91404-3201. 

■ ■ ■ 

Infocom's latest interactive fantasy, Wish- 
bringer, is geared for introductory-level play- 
ers. Authored by Brian Moriarty, the game 
has two different difficulty levels. It can be 
played in a "magic-mode" or a "logic-mode." 

ANALOG Computing readers may remem- 
ber Brian as the author of Crash Dive!, Ad- 
venture in the Fifth Dimension and The Black 
Rabbit. 

Cost is $34.95, from Infocom, 55 Wheeler 
Street, Cambridge, MA 02138. 



COMMAND SERIES SIMULATIONS 

Crusade in Europe, the first in the new 
Command Series from Microprose, recreates 
the American and British struggle against 
Nazi Germany from the D-Day hwasion to the 
Battle of the Bulge. 




iji "^JS.« ».-•_*- jJr-TljrA,^^ 



Three short scenai-ios are included that can 
be played in an hour plus two longer versions 
that can take two to four hom's. The game can 
be saved and replayed at a later time. 



"^^ 





The second release, Decisions in the Des- 
ert, puts you in the battle between Rommel's 
Afrika Korps and the British 8th Army, for 
control of North Africa. At $39.95 each, from 
Microprose Software, 10616 Beaver Dam Rd., 
Hunt Valley, MD 21030 — (301) 667-1151. 



ST NEWS 

Digital Research's Graphics Environment 
Manager (GEM), besides running on the new 
Atari ST, has also been developed for Apri- 
cot, Epson, TI, Commodore and several other 
companies. With software transportability be- 
ing somewhat easy, and the companies be- 
low supporting GEM, there should be inter- 
esting tilings happening the next few months. 

Spinnaker Software, Thorn EMI, Quadra- 
tron Systems, Lifetree Software, Haydon Soft- 
ware, ProVUE, Sierra On-Line, Schoenburg 
and Hoxie, Software Products Int., Chang 
Labs, Infocom, Batteries Included and Array/ 
Continental have all hopped aboard the GEM 
wagon, developing products from educational 
lines to office automation. 

If you are interested in writing GEM soft- 
ware, you can sign on to the GEM Program- 
mer Support Service and receive the GEM 
Programmer's Toolkit, containing GEM soft- 
ware and a complete IBM PC development en- 
vironment, with toll-free technical assistance. 
Cost is $500, Digital Resemdi, 60 Garden Ct., 
Monterey CA 93942 — (415) 494-2030. 



CREATIVE SOFTWARE'S BESTSELLER 

Trolls and Tribulations has seven levels 
with over 200 eerie chambers for you to ex- 
plore. Under your city, you'll find an entire 
world full of troll-eating creatures, sinister 
skulls, amazing treasures and flying buz- 
zards. 

Disguised as a troll, you wander dark 
caverns and secret dungeons, in order to save 
the treasures from criminal greed. Chances 
are you'll be eaten, pushed into rising waters 
or cornered in a dmigeon. Full color graph- 
ics and animation are featured in this 48K 
disk-based game. 



L.^ 



_JL L 



_.__*i___-l 



Retail is $24.95, from Creative Software, 
P.O. Box 61688, Sunnyvale, CA 94086. 
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PRODUCTIVITY SOFTWARE FROM TIMEWORKS 

and record checkbook Iransactions, then cross 
search via check number, amount, description 
or date. Backup copies of your check records 
can easily be transferred. 

The Data Manager is a general information 
and retrieval system, which also provides a 



tudget/Actual 
Budget/Actual For An Iten 

Budset/Actual Bar Chart ^ 

w/Modif9 Budget Categories ^^^^M « *«wwM« N m ii i« THE »ata hanogeihhhhhhiw 



What Mould vou Like To Do?tl-9J 



The Money Manager, a home and business 
budget cash flow system from Timeworks, al- 
lows you to enter sixteen budget and actual 
categories on a monthly basis, for a twelve- 
month period. Full analysis is provided, along 
with bar charts. Storage is allowed for, on tape 
or disk. This program can also be interfaced 
to work with Timework's Electronic Check- 
book, a check recording, sorting and balanc- 
ing system. 

The Electronic Checkbook lets you organize 



tfiew/Hodify By IteM Ele 
View/Hodifg By Date Range 



_uld Vou tike TO Do 



cross search using name, date range, amount, 
location, category and more. The program is 
also capable of analyzing to produce sum, aver- 
age, standard deviation and frequency charts. 
Up to 5100 lines of information can be saved 



on one disk (or up to 5000 lines on a 60-minute 
tape). 

Timeworks also provides extensive user sup- 
port in the way of a toll-free help line to reg- 
istered owners, a money back guarantee and 
a system trade-up policy. The latter is rather 
miique in that it allows you to trade up in soft- 
ware if you move up in hardware. 

Cost is $24.95 each, from Timeworks, 444 
Lake Cook Rd., Deerfield, IL 60015 — (312) 
948-9200. 



Hm mUt mtHK eLeCTftOMIC CHECKBOOKfHHHHIW 



View/^Hodify info 



3. Uiew/Hodify Transactions 

4. Analyze Transaction AMOunts 
s. Honthly Reconciliation 

6. DUMP Records To Printer 



Hhat Mould Vou Like To Do?Cl-7J 



Q-MODEM AND R-LINK 



llillllll 




Quantum Microsystems has developed two tele- 
communications products just for the Atari com- 
puter line. 

Q-Modem sports custom color displays and on- 
screen menus to access a built-in editor, disk util- 
ities, multiple buffers and file transfer with or 
without Xmodem. 

R-Link is a serial interface which connects be- 
tween an Atari serial bus and a standard 300/1200 
baud modem, eliminating the use of an 850 mod- 
ule. Compatibility is retained with Amodem and 
many BBS programs. For information, contact 
Quantum Microsystems, Inc., P.O. Box 179, Liver- 
pool, NY 13088-179 — (315) 437-6617 



BLUE MAX. . .2001 

The futuristic sequel to Blue Max, Blue Max 
2001 follows the same type of graphics display 
as its predecessor. 

You're out to stop the FURXX from invading 
Earth's colonies by infiltrating their defenses, 
hoverfields and a secret final destination. 

Blue Max 2001 is simply Blue Max with new 
graphics. The bombing, shooting and landing 
techniques are all the same as the original. 

Blue Max 2001 requires 48K disk and is 
available from Synapse Software, 5221 Central 
Avenue. Richmond, CA 94804. 




IT'S MIDNIGHT AT MAXWELL MANOR 

As Professor Arabesque, on the authority 
of the Psychical Society, you must find the 
Skull of Doom controlling Maxwell Manor— 
and learn how to destroy it. The house con- 
tains the answers, along with some help 
(you'll need it). Gold coins, crosses, bullets. 




all will assist you. Bugs in the garden, blood 
spots in the hall and huge spiders downstairs 
are only the beginning for you. This one- 
player game has more than 50 graphic screens 
and over 100 variations, plus 10 levels of skill. 
The 48K disk costs $25.00. Avion Hill Mi- 
crocomputer Games, 4517 Harford Road, Bal- 
timore, MD 21214 — (301) 254-9200. 
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You have already 
made your 
first mistake ! 

You thought that cassette recorder 
would handle your storage needs. 

WRONG! 

Don't make 
another one ! 

You think you need a dish drive 
to solve your storage problenns. 

WRONG! 

You need 2 
disk drives! 

Any serious application practically 
dennands at least Z drives. 

Word Frocessing 

Spreadsheet 

Data Base Management 

Mailing List Software 

All of these are nnade more 
powerful and, at the same time, 
easier to use if you have two dish 
drives. 

5o now it will cost twice as much, 
right? 

WRONG! 

You need an Astra single or double 
density dual dish drive. Two drives 
in one low-priced unit. 

Astra Systems now has 
tivo new models for your 
ATARI: 




ASTRA 2001 

Single or Double Density ■ 
Dish Drive ■....._ 

■ Advanced Circuitry 
Rotary Doors 

- Direct Drive Motors s . ,.,,^,, 

■ 560 Kbytes 
I Reliable, Quiet Operation 
I Fast Read/Write 

■ Easy Data Read 

ASTRA ''BIG D"^^^'^ 

■ Double 5ided Drives 

■ Single or Double Density 

■ Direct Drive Motors 

■ 720 Kbytes 

ALL DRIVES EURMI5HED WITH 
5MARTD05 0RMYD05* 

•DOUBLE SIDED DRIVES 



For nearest dealer or distributor call 
(714) 549-2141 

>/^flSTfifl SVST6MS, INC 

2500 South Fairview, Unit L 



Santa Ana, California 92704 
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16K Cassette 
24K Disk 



UTILITY 



Q 



Unicheck 

The Universal Checksum 

Program 



by Tom Hudson 



Many of our readers currently use the D:CHECK2 
and C:CHECK programs to find typing errors in the 
programs they enter from ANALOG Computing. Un- 
fortunately, these checksimi programs can be cumber- 
some to use. In an effort to simplify checking pro- 
grams for typos, I have developed Unicheck. 

This is a program which loads into your system 
at power-up time as a device, allowing you to gener- 
ate a checksum table with a simple keyboard com- 
mand. Your BASIC program stays in memory all the 
time, eliminating the annoying LIST and ENTER op- 
erations. 

Typing it in. 

Before typing anything, look at the listings accom- 
panying this article. 

Listing 1 is the BASIC data and data checking rou- 
tine. This listing is used to create both cassette and 
disk versions of Unicheck. The data statements are 
listed in hexadecimal (base 16) to conserve memory. 

Listing 2 is the assembly language source code for 
Unicheck, created with the OSS MAC/65 assembler. 
You do not have to type this listing to use Unicheck! 
It is included for those readers interested in assem- 
bly language. 

ANALOG COMPUTING 



Follow the instructions below to make a cassette 
or disk version of Unicheck. 

Cassette instructions. 

1. Type Listing 1 into your computer, using the 
BASIC cartridge and use C:QEIECK to check your 
typing. 

2. Type RUN and press RETURN. The pro- 
gram will ask: 

HAKE CASSETTE (01 OR DISK CD? 

Type and press RETURN. The program will 
begin checking the DATA statements, printing 
the line number of each as it goes. It will alert 
you if it finds any problems. Fix any incorrect 
Unes and re-RUN the program, if necessary, until 
all errors are eliminated. 

3. When all your DATA lines are correct, the 
computer w^ill beep twice and prompt you to 
READY CASSETTE AND PRESS RETURN. In- 
sert a blank cassette in your recorder, press the 
RECORD and PLAY buttons simultaneously and 
hit RETURN. The message WRITING FILE will 
appear, and the program will create a boot tape 
version of Unicheck, printing each DATA line 
number as it goes. When the READY prompt ap- 
pears, Unicheck is ready to use. CSAVE the BA- 
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PROTECTIOH 
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Is 



DHGE inCCWUSCKI. 



AIW^NCED 

RTMI 

PfiOTCCTIOH 

TeCHNIOUe5 



GEORGE moEvuscn: 



THE BOOK I 



THE BOOK I 



BOOK I + DISK; (The Original) Thoroughly explains the lechniques used by advanced 
soltware pirates, and the copy protection methods used to stop them. It oilers clear and 
underslandable explanations sophisticated enough for software writers of any scale yet 
easy enough lor a beginner just wanting to learn more about Atari'' computers. A MUST 
READ FOR ALL ATARP OWNERS, 

BOOK I INCLUDES: • Duplicate sectoring • Custom disk fofmalting • Creating "BAD" 
sectors • Hardware data keys • Legal prolection like copyrights, trade secrets, patents 

• Protecting BASIC programs • Self-modilying Code • ROM + EPROW carliidges 

• Hidden serial numbers • Sell-deslfucting programs • Freeware • Misassigned sectoring 

• Much, much more. 
DISK t INCLUDES: • Difectory mover • VTOC scanner • Duplicate sector Under • Sector mover • Bad sector writer • 

Sector data displayer • Autorun builder ■ Other useful programs. 

This comprehensive book and disk package should not be conlused with low quality imitations oKered elsewhere. 

BOOK II + DISK II: Advanced Software Protection. This all new sequel starts where the highly acclaimed Book I 

leaves off. Book II is the most up-to-date resource available lor the Atari'' owner. Includes reviews and explanations 

of products such as: The Happy Enhancement ', The Impossible ', The Scanalyzer ', The Chip '. The Pill ' and Super 

& many others. 

BOOK II: Tells you specifically what they copy, what they won't, how they are used, and the details of how they work, 

Bookll also includes such topics as: • Transmitting protected programs • Copying disks with more than 19 sectors/track 

• Data encryption • Phreaking methods • Program worms • Logic bombs • Bank-select cartridges • Random access 

codes • New trends in software law • Sample BASIC + Assembler programs • On-line security ■ And much more. 

DISK II INCLUDES: • Automatic program protector • Custom format detector • Newest protection demos • Forced 

password appender • Data encrypter • And much more. 

OFFICIAL RELEASE DATE; APRIL 30— ORDER NOWITD RESERVE YOUR COPY. 

Book + Disk Packages only $24.95 each or Special OHer both lor only $39.95 




your Arari grnphics like you vg nevar soon baloral Mognlpflni II ib the most powerful print ulilily 
/ailEible tor your computer. It is tha only soltwaro Ihat can accurately pnnt GTtA modes wilh 16 snadas. 
nil graphic modes (not taut modes 1 & 2) 'pan blow up l^our pi^" ' " 



n down to % page • Works 
:h graphics (050 intorfaca or equivaleni ra- 
quirBd) • Accoplo your own graphics creations or those created with Graphics Master-, 
Mictopalnlor', Fun With Art". Supor Sketch*. Atari Graphics Liflht Pen", B/Graplf, Koala Pad , 
Atari Touch Tahlot". Paint*. Strip Pokar*. Graphics Magician*, and others • Includes many 
beautiful sample pictures • Doos amoling graphics with your standard printer and paper 
• Spocial feature lots you modify pictures with your joyBlick" Add tout lo your pictures 'Can 
«n-a^p- . -^ convert a graphics mode 9 picture to a graphics mode Q one {and vice versa) • Allows you 
(BinHw^li'+^'q to prinlthewholo screen or any salectod portion of the screen in multiple aiies • Includes 
Sti:!f OKt; r 'It-a help screen tor easy use ■ Prints GTIA modes 9. 10. and 11 wilh 16 diOerent shades • Quick- 
vi'^aS-af Prim lots you have a quick provlow ol the picture • See your pictures in full QTIA 
>5ja^^ PoBleis print along continuous Bhools ol paper 
which are attached logether when done. 
I FHEE; With every Magniprmi II order g ef PRINTAL L' FREE. PRINTALL prints your programs and Hies jusl as 
t screen. It clearly prints ■fJl'H:MiM and all the Alari graphics characloia, and piinls in regul 
I cbhaonaod print. This alone is worth the price. 



oNLv$24.95 
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i^ilPERSOIVAT^ 



tARnUIMSE TO DISK 
COPY SYSTEM 



3r only $39.95 you can make working copiesol all your Atari"* compulercartridges(16Kor loss). Our special package 

It you save your cartridges to ordinary disk tiles. They will run eitactly like tha originnts when used with the 

Impersonator, Each disk holds up to 12 carlridgo programs, fvlmu you can put all your roal t;iinrid[ios away for sale keeping 

- -6 use the Impersonator lor everything, YES. IT REALLY WORKSI The Imporsonulor doos COQ QC 

arything Ihe high-priced cartridge back-up systems do , . , and MOHE ONLV ittJs.*'^ 



I I I 



BONUS: Order any 3 
programs & get FREE, 
Deluxe Space Games 
(3 games on a disk) 



iY5TEM5 



1CALL: 216-374-7469 to charge to MasterCard or VISA | 

OnMAILTO:AlphaSystems/4435MapleparkRd./5t0w,OH44224 
Send checli or money ortJer. Include $2,00 shp. & hdlg. ch, I 
Ohio residents add 5'A% sales tax. 



Q 



Unicheck continued 
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SIC program onto a separate tape before con- 
tinuing. 

4. You will want to load Unicheck whenever 
you're entering programs from ANALOG Com- 
puting, so you can check them for accuracy. To 
do this, rewind the tape created by the program 
to the beginning. Turn your computer OFF. If you 
have a 400/800/1200XL computer, be sure the 
BASIC cartridge is inserted. Press the PLAY but- 
ton on your recorder and turn ON your computer, 
while pressing the START button. The computer 
will beep once. Hit the RETURN key, and Uni- 
check will load into your computer. The READY 
prompt will appear, and you're ready to type in 
your program. 

Disk instructions. 

Type Listing 1 into your computer, using the 
BASIC cartridge. If you have D:CHECK2, use it 
to check your typing. 

2. Type RUN and press RETURN. The pro- 
gram will ask: 

HftKE CftSSETTE CS} OR DISK Cl>? 

Type 1 and press RETURN. The program will 
begin checking the DATA lines, printing the Une 
number of each statement as it goes. It will alert 
you if it finds any problems. Fix incorrect lines 
and re-RUN the program, if necessary, until all 
errors are eliminated. 

3. When all DATA lines are correct, you'll be 
prompted to INSERT DISK WITH DOS, PRESS 
RETURN. Put a disk with DOS 2. OS or DOS XL 
into drive 1 and press RETURN. The message 
WRITING FILE will appear, and the program 
will create an AUTORUN.SYS file on the disk, 
displaying each DATA line number as it goes. 
When the READY prompt appears, Unicheck is 
ready to use. Be sure that the BASIC program 
is SAVEd before continuing. 

4. You will want to load Unicheck whenever 
you're entering programs from ANALOG Com- 
puting, so you can check them for accuracy. To 
do this, replace the disk containing the AUTO- 
RUN.SYS file in drive 1. Turn your computer 
OFF. If you have a 400/800/1200XL computer, be 
sure the BASIC cartridge is inserted. When you 
turn on your computer, Unicheck will load auto- 
matically. (Note: Unicheck will only work as an 
AUTORUN.SYS file. Do not try to load it with 
the Binary Load fimction.) The READY prompt 
will appear, and you're ready to type in your 
program. 
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Checking your typing. 

Once Unicheck is loaded into your computer, it's 
ready to check the typing of your programs — anytime 
you want. After the program is typed in, just enter: 

LIST "U:" 

This will print a checksum data on your screen. If 
you have a printer, you can enter: 
LIST "U2:" 

This will print the checksum data on your printer. 
Let's see how to interpret the checksum data . Figure 
1 shows a typical checksum data table. 

18 »ATA 34,455,234,22,55,38,93,45,114, 

285 , 633 , 442 , 453 , 23 , 31 , 2957 

160 DATA 82,94,64,73,347,199,287,84,15 

6 , 368 , 59 , 48 , 98 , 9 , 342 , 2302 

310 DATA 65,356,101,25,547 

Figure 1. 

Each line of the program being checked has its own 
checksum value. If any characters in the line are in- 
correct, the checksum for that line will differ from 
the corresponding magazine checksum. The check- 
sum data is organized so that there are fifteen check- 
sum values in each line, with the sixteenth value 
containing the total of the checksums. 

The line number of the checksum line tells which 
line number is first in the checksum group. In Fig- 
ure 1, the first line checked in the first checksum line 
is 10. The checksum for Line 100 is 34. The check- 
sum of the line after Line 10 is 455, and so on. The 
total of the checksums in the first group is 2957. The 
first line checked in the second checksum line is 160, 
and its checksum is 82. The first line checked in the 
third checksum line is 310, and its checksum is 65. 

Let's assume that the checksum data in Figure 1 
was listed in the magazine, and you typed in the pro- 
gram and checked it with Unicheck. Figure 2 shows 
an example of what the Unicheck output may look 
like if you have typing errors. 

10 DATA 34,455,234,22,55,38,244,45,114 

, 285 , 633 , 442 , 453 , 23 , 31 , 3108 

160 DATA 82,94,64,73,347,199,287,84,15 

6 , 368 , 59 , 48 , 98 , 9 , 342 , 2302 

310 DATA 65,101,34,280 

Figure 2. 

The first thing to do is look at the total of the val- 
ues in the first line. If there are any mistyped lines, 
it is easiest to spot here. This value should be 2957, 
as shown in Figure 1. However, in the results in the 
Unicheck output, the total is 3108. This means that 
there is an error in the fifteen checksum values in 
this line. Comparing the individual Unicheck check- 



sum values to the magazine values, we find that the 
seventh checksum is 244 in the Unicheck output, but 
should be 93. This means that the sixth line after 
Line 10 has an error that must be fixed. Note the er- 
ror and continue checking. The rest of the line is cor- 
rect, so we go on to the second line. 

Now we check the total of the second line. The to- 
tal of 2302 in our Unicheck output matches the total 
in the magazine, so we can go on to the third check- 
sum line. 

The third checksum line is different from the others 
in that it only checks four lines. This is because it 
is at the end of the program, and the program did 
not have an even multiple of fifteen lines. The line 
is checked the same way as the others. As you can 
see, the checksum line total should be 547, but is only 
200 in the Unicheck output. Looking at the Unicheck 
output, you will notice that there is one less check- 
sum value (the 356 in the magazine checksum data). 
This means that the first line in the program after 
Line 310 is missing. The last checksum in this line 



PARTS/SERVICE FOR ATARI* COIVIPUTERS 

FLAT SERVICE RATES BELOW INCLUDE 
PARTS AND LABOR, 60-DAY WARRANTY 



800 Compuier Repair $65-00 

400 Compuier Repair $47.50 

600XL Compuier Repair $65,00 

1200XL Compuier Repair $65.00 

INTEGRATED CIRCUITS 

GTIAChip. . .0014805 

upgrade wilh instruclions , , . $11.50 

10K Rev- B OS Upgrade. . .for 400/800 
3-Chip ROM set wilh instruclions. . . .$12.50 

Pokey Chip. . .C012294 $8.50 

Antic Chip . . .C012296 $10.50 

PIA Chip , . .C014795 $11.00 

Basic ROM set $15.00 

CPU Chip, , ,0014806 $12,50 

MODULES/CIRCUIT 

BOARDS. . .complete with IC's 

16K RAM Memory Module, , , 

CX853 $24.50 

800 10K Rev. B OS Module $18.50 

800/400 CPU Board wilh GTIA $24.50 

800 Main Board $28,50 

400 Main Board $26,50 

400 Main Board w/o ICs $8.50 

800 Power Supply Board $10.50 

810 Data Separator Board. . - 

upgrade witti instruclions . , $25.00 

810 Side Board w/o Sep, & 1771 $43.50 

810 Rear Power Board $25.00 

810 Analog Board $16.00 



810 Disk Drive Repair $79,50 

800XL Computer Repair $67,50 

850 Interface Repair $60.00 

1050 Disk Drive Repair $85,00 

REPLACEMENT/BACKUP 
BOARD SETS. 

800.. .OK $72.50 

800. ..48K $122.50 

400... OK $52.50 

810 Board Set $110.00 

All Boards complele with ICs, etc. 
Keyboards not included. 

MISC. 

810 Rear Board/Analog Board Upgrade, , . 
with 10-pin jumper 

and instructions $39.50 

Editor Assembler $25.00 

BASIC Cartridge, . , 

w/o Case, Manual $23,50 

Cartridge Circuit Boards $3.50 

Non-Atari' Cartridge Boards $1.50 

Replacement 810 Drive Mech $85.00 

Replacemenl Power Transformer . , , .$16,50 
SAMS Service Manual 

for 800 or 400 $19.95 ea. 

800 Keyboard Repair $35.00 

850 Interface $135,00 

De Re Atari $12,50 



AMERICAN TV 

415-352-3787 

Mail Order and Repair 15338 Inverness St., San Leandro, CA 94579 

Retail Store 1988 Washington Avenue, San Leandro, CA 94577 

Terms: We accept money orders, personal checks or C.O,D,s, , ,VISA, MasterCard okay on orders 
over $25-00, No personal checks on C.O.D. 

Shipping: $4.00 shipping and handling on orders under $150,00. Add $2.00 for C.O.D. orders. Cali- 
fornia residents include 6'/2% sates tax. Overseas shipping extra. 

Prices subject to change without notice. We reserve the right to limit quanlities. Sales limited to 
stock on hand. Above units repaired or exchanged with rebuildable exchange. Include $700 return 
shipping and insurance. 

Foreign shipping extra. 

Much more! Send SASE tor free price list. 

Repair/upgrade services available. , .Call. 'Atari is a registered irademark of Atari Corp. 
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is also incorrect. It is a 34 and should be 25. This 
means that the third line after Line 310 in the pro- 
gram is incorrect. 

To summarize, there were three errors in the pro- 
gram we checked. Two errors were caused by typos, 
and the third appeared because of a missing line. 

After all errors have been noted, make the neces- 
sary changes, re-LIST the program to "U:" or "U2:" 
and compare the Unicheck output to the magazine 
checksum data again. Simply repeat this process un- 
til all errors are eliminated. When you're finished, 
you'll have an error-free program! 

Some final notes. 

I feel sure that users of ANALOG Computing's 
D:CHECK2 and C:CHECK will find Unicheck a much 
easier program to work with. There are a few things 
to remember when using it, however. 

Unicheck takes up about 400 bytes of memory. 
Some programs may be too large to load into mem- 
ory with Unicheck present, and you'll get an ERROR- 
19. In these rare cases, you should use the less con- 
venient C: or D:CHECK programs. 

Don't worry about pressing RESET when Unicheck 
is loaded. It will remain safely installed until you 
turn your machine off (or type DOS in a disk system 
— see below). 

For disk users, typing DOS will remove Unicheck 
from memory. This is a necessary precaution with 
DOS 2. OS. The first time you type DOS, the com- 
puter will perform a system reset and remove 
Unicheck. Typing DOS again will take you to the 
DOS menu, as usual. If you return to BASIC, how- 
ever, Unicheck will no longer be present. 

Unicheck only works with programs from issue 10 
or later. If it is used with programs before issue 10, 
incorrect checksum values will result. D 



Listing 1. 
BASIC listing. 

le REM *** UNICHECK »»» 

2« TRAP 28:? "MAKE CASSETTE CO), OR DI 

SK tlJ";:IMPUT D5K:IF D5K>1 THEN 20 

30 TRAP 40e00:DATA 0,1,2,3,4,5,6,7,8,9 

,0,0,0,0,0.0,0,10,11,12,13,14,15 

40 DIM DAT5C31} ,HEMC22) :F0R K=0 TO 22: 

READ N:HEKCX)=N:NEXT X:LINE=99e :RESTOR 

E 1000: TRAP 120:? "CHECKING DATA" 

50 LINE=LIHE+10:? "LINE :"; LINE :READ DA 

T5:IF LENCDAT$}<>90 THEN 220 

60 DATLIN=PEEK(183)+PEEKtl84>*256:IF D 

ATLINOLINE THEN ? "LINE ";LINE;" MISS 

ING!":END 

70 FOR X=l TO 89 STEP 2 : D1=ASC CDATS CX , 

X) > -48 : D2=ASC CDAT5 tX+1 , X+1) J -48 : BYTE=H 

EXCD13»16+HEXtD2J 

80 IF PASS=2 THEN PUT ttl , BYTE : NEXT X:R 

EAD CHKSUM:GOTO 50 



90 TOTAL=TOTAL+BVTE:IF T0TAL>999 THEN 

T0TAL=T0TAL-1000 

100 NEXT X:READ CHKSUM:IF TOTAL=CHKSUH 

THEN 50 
110 GOTO 220 

120 IF PEEK f 195) <>6 THEN 220 
130 IF PASS=0 THEN 170 
140 IF NOT DSK THEN 160 
150 PUT ttl, 224: PUT ttl, 2: PUT ttl, 225: PUT 

ttl, 2: PUT ttl, 154: PUT ttl, 50: CLOSE ttl: EN 
D 

160 FOR X=l TO 66: PUT ttl, 0: NEXT X:CL05 
E ttl: END 

170 IF NOT DSK THEN 200 
180 ? "INSERT DISK WITH DOS, PRESS RET 
URN";: DIM IN$ CD : INPUT IN$:OPEN ttl, 8,0 
,"D:AUTORUN.SVS" 
190 PUT ttl, 255: PUT ttl, 255: PUT ttl, 0: PUT 

ttl,48:PUT ttl,176:PUT ttl,51:G0T0 210 
280 ? "READY CASSETTE AND PRESS RETURN 
";:OPEN ttl,8,128,"C:":REST0RE 230:F0R 
X=l TO 13: READ N:PUT ttl, N: NEXT X 
210 ? :? "MRITING FILE":PASS=2:LINE=99 
0: RESTORE 1000: TRAP 120: GOTO 50 
220 ? "BAD DATA: LINE "; LINE: END 
230 DATA 0,8,243,47,158,50,169,60,141, 
2,211,24,96 

1000 DATA 88e8888e0E068000eE06eEe64C3E 
07A00168A20FB5209DD206CA10F8A9818DC206 
68A28FBDD206952eCA10F86e , 623 
1010 DATA A5CF8DCE86A5CE8DCFe6A5CD8DD0 
e620E206A99BAED106E002F014A20B8E4203A2 
008E48038E49e3205eE48CC2 , 922 
1020 DATA 0660AEB9e69D0e01EEB906AEB906 
E82eF804C99BD0EBA20BBDAD069D0003CA10F7 
A900SDB906A99B8D2eei2059,938 
1830 DATA E48CC2e6A227A92e9D00eiCA10FA 
60ADFeQ6S5eAADF106858BADF206850CADF3e6 
850D4C74E440ei5788000130 , 639 
1048 DATA 0028004E00002041544144e00e80 

oooieAe48ii8ooeo8eoioeooeoooeeooooo80o 

000088000888800000000000 , 288 

1858 DATA 884CFFFF3D5F735D819A81888888 

880888e8888888888888880000eee0008828FF 

FFD8ADEC868DE7028580ADED , 524 

1060 DATA e68DE8028581ADF406858AADF586 

858BA000B91A03C900F005C8C8C8D0F4A90899 

lB83A9e6991C83A955991A83,328 

1878 DATA 4C88A8882812e6A9888DCD8685CD 

85CE85CF85D885D1A9828DC1868DCC06A5218D 

D106DOOCe820120eADCC06D0 , 132 

1080 DATA 03202D062022e628ACC20e600885 

D485D5201206A9008DBF068DC006A202D8A5D5 

DDC38e901D38FDC30685D5F8,856 

1090 DATA ADBF06187DC60e8DBFe6ADC0067D 

C9868DC88ei898DBCA10D8AECC8eF828A5D42e 

4186A5D4C920D015A9008DCC,269 

1108 DATA e6A98485CCA6CCBDBA8e284186Ce 

CC18F4AEC186F8ADBF861865De85D0A5D16DCe 

06298F85DlCADeECEEC186AD , 381 

1118 DATA C186C984D885A9818DC18eA5D4C9 

9BF8082022e628ACC20668A5D81865CD85CDA5 

D165CE85CEA5CFe9ee85CFD8 , 83 

1120 DATA A9008DCE86A5D18DCF86A5De8DDO 

e62eE20eA92C2e4106A90085D085DlA9028DCl 

0eEECD8eADCD86C98FD8B828 , 477 

1138 DATA 2D8eA98885CD85CE85CF8DCD86A9 

818DCC86D8A3A98885CB85CCA4CCB9CE864A4A 

4A4AD004A6CBF807E6CB093e , 179 

1140 DATA 204106A4CCB9CE06290FD00SC002 

F004A6CBF087EeCB8938284186EeCCA5CCC983 

DOC A60A9018509A90685CEA9 , 474 

1150 DATA 3085CCA90085CB85CD8D44e2A8Bl 

CB91CD88D0F9ADE78285CDADE88285CEA93185 

CCA281A888B1CB91CD88D8F9 , 95 

1160 DATA E6CEE6CCCA18F8ADE78285CD186D 

E5868D8886ADE88285CE698e8D8186A5CD186D 

E68e8D82e6A5CE698e8D838e , 195 



PAGE 16 / JUNE 1985 



ANALOG COMPUTING 



1170 DATA A5CD186DE7068D068eA5CE6900SD 

e786A5CD18eDE8e68DE3eeA5CE6DE9e68DE4e6 

A5CD186DEAee8DEC86ASCE6D , 533 

1180 DATA EB868DED06A5CD1869038DEEe6A5 

CE69e08DEF06A5e9C901D038A0e2A50D8DF306 

91CD88A50C8DF2e6?lCDA50A , 846 

1190 DATA 8DF0e6A50B8DFieeA5CD850CA5CE 

85eDA9968DF4e6A9868DF58e6CEEe6A0028489 

A90691CD88A91191CDA5CD85 , 461 

1200 DATA 82A5CE8503A9718DF406A9E48DF5 

06ecEE06oe80ooooeeoooooo8eeooooooooeoo 
eeoeeoooQooooeeooooooooe , 784 



CHECKSUM DATA. 

(see page 13] 

18 DATA 732,351,496,811,423,729,200,60 
3 , 555 , 573 , 694 , 613 ,29 , 285 , 202 , 7216 
160 DATA 760,198,962,645,494,30,155,40 
7 , 655 , 57 , 943 , 792 , 477 , 479 , 749 , 7803 
1070 DATA 809,718,135,156,208,0,195,99 
3,307,36,295,113,135,995,5095 



Assembly listing. 



.OPT NO LIST 
lUNICHECK 

IUniv*rfl«l ChacksuH 
I 

I by Tom Hudson, Jun 
lANALOa Caaputlng 
I 
IpAga xmro aquatas 



Prograa (V2.»> 
1985 



LEADS - *Ct 

PRTIX - »CC 

TDTLO - •CD 

TOTMD - »CE 

TOTHl - tCF 

CHKLO - (DC 

CHKHl - •Ol 

BYTE » *D* 

BYTE2 - •DS 

Ixaro-paga aatup pointara 

«CB 

•CD 



llaadlng -flag 
!• print IndaK 
IBCD chkaua total 



I BCD chackaua 



I incoaing char 
I 1 ncoaing char 



RE8T0R 
RZIOCB 



Iprlnt 
PLTOTL 



Iprint 
PBVTE 



RT8 land SKlt 

LDX ais 

LDA ZIOBAK.X Iraatora tha 

BTA ZIOCB.X leaning IOCS 

DEX Idata 

BPL RZIOCB 

RT8 land axlt 

chackaua Una total 



LDA TOTHI 
STA TOT» 
LDA TOTMD 
STA TOTl 
LDA TOTLO 
BTA T0T2 
J8R JTOTL 

LDA tias 

char in A rag 



laat up chkaua 
(print araa Hith 
■total 



Iprint tha aaount 
Igat CR. . . 



FROn 
TO 
I 

IPrograa aquataa 
I 

CASINI - *02 

BOOT? - •»<) 

D08VEC - ««A 

DOSINI - »»C 

ZIOCB - *2t 

ICDNOZ - •21 

LQMEM - •B* 

PRTBUF - •0100 

COLDBT » ^0244 

HEMLO - •B2E7 

DDEVIC - *0300 

HATABS - *031A 

ICCOH - ^0342 

ICBLEN - •0348 

CIOV ■• •E4S& 

8IQV - •E4S9 

HARM8V - •E474 

iThla coda i« placad at ^3000 

I than aovad to paga & for aaay 

laubroutlna accaaa 



Icaaa init vactar 
Iboot davica 
I DOS run vactor 
I DOS init vactor 
Izaro paga lOCB 
Idavica I 1/2 
I BASIC lo aaaory 
■-' hu«far 



»9 



lay print buff 
IcolS atart fl 
I low aaaory ptr 
ISIO davica • 
Ihandlar tablaa 
IIOCB coaaand 
ICIO buf langth 
ICIO vactor 
1810 vactar 
I Mara atart 



PRTXIT 
PRINTR 



PRNTIT 
8PLP 



• - •0<>00 



f 11a 
fill 



I 

I 

lUNICHECK antry tabla 

I 

UHTBL .HORD (00 lopan 

UC .MORD ^00 Icloaa 

.WORD NOHAN-1 
UU .WORD *00 iHrita flla 

.HORD NOHAN-1 

.WORD NOHAN-1 

JMP OPEN I init vactar 
NOHAN LDY »1 
HYRTB RTB 
SAVE LDX US 
9ZI0CB LDA ZIOCB.X I aava tha 

BTA ZIOBAK.X Icalllng lOCB 

DEX Idata 

BPL SZIOCB 

LDA ttl laat up good 

BTA HY8TAT Iraturn atatua 



laparation OK 
I raturn ! 



LDX 
CPX 
BEQ 
LDX 
BTX 
LDX 
BTX 
BTX 
JSR 
BTY 
RTS 
LDX 
BTA 
INC 
LDX 
CPX 
BEB 
CHP 
BNE 
LDX 
LDA 
STA 
DEX 
BPL 
LDA 
BTA 
LDA 
BTA 
JSR 
BTY 
LDX 
LDA 
STA 
DEX 
BPL 
RTS 
LDA 
BTA 
LDA 
BTA 
LDA 
BTA 
LDA 
BTA 
J«P 



Igat output unit 

Iprintar? 

I yaa '. 

I output noda 

Ixaro buffar 

llangth (char in 
+ 1 I accumulator ) 

Iprint to acraan 

laava atatua 

land anit 

Igat buf IndaK 
,X I put char in buf 

InaKt buf IndaK 

Igat IndaK 

land of buffar? 

I yaa! 

Icarrlaga raturn? 

I no ! 

Icopy printar... 
, X I conaanda. . • 
;x I to 810 araa 

laora bytaa? 

I yaa ! 

I zaro out ... 

Ibuffar IndaK 

laat Up CR 
+38 I in buffar 

Iprint tha Una! 

laava atatua 

I noM claar ... 

Iprint buffar 
X 



OUTPUT 

•2 

PRINTR 

• •0B 
ICCOH 

• 

ICBLEN 
ICBLEN 
CIOV 
HYBTAT 

PBUFIX 

PRTBUF 

PBUFIX 

PBUFIX 

•38 

PRNTIT 

• •9B 
PRTXIT 

• ••B 
PCOHND 
DDEVIC 

8PLP 

• 
PBUFIX 

• •9B 
PRTBUF 
8I0V 
MYSTAT 

• 39 
•32 
PRTBUF 



CPBUF 

land aKlt! 
DVSAVE iraatora... 
DOSVEC I DOB vactor 
DVSAVE+l 
DOSVEC+l 

DISAVE iraatora 

DOSINI ID08 Init vactor 

DI8AVE+t 

DOBINI+l 

HARHSV layataa raaat ! 



I mi acal lanaoua data 

I 

PCOMND 



.BYTE •80 I output 

.WORD PRTBUF Ibuffar addraaa 

.WORD ^30 itiaaout 

.WORD ^28 Ibuffar langth 

.BYTE •4E Inoraal print 

.BYTE •00 lunuaad 

PBUFIX .BYTE 

PDATA .BYTE " ATAD" 

BCDBYT .BYTE 0,0 

X .BYTE 

HYSTAT .BYTE 

DECTBL .BYTE 1,10,100 

BCDADL .BYTE •01,tl0,^00 

BCDADH .BYTE •00,^00,^01 

LFLA8 .BYTE 

LCOUNT .BYTE 

TOT0 .BYTE 

TOTTl .BYTE 

T00T2 .BYTE 

OUTPUT .BYTE 

ZIOBAK .BYTE 0,0,0,0,0,0,0,0 
.BYTE 0,0,0,0,0,0,0,0 

IJMP vactor for aubroutina 

I 

JTOTL JMP aFFFF I to PTOTAL 

I 

IRalocation factora 

I 



OPNDLQ 

CLODLD 

URTDLO 

TOTDLO 

TOTDHI 

CENDLO 

CENDHI 

NEWnLL 

NEMMLH 

JUPDVL 

JMPDVH 

DVBAVE 

DISAVE 

HYDOS 

FILLER 

I 

IThia aaction 

I than aovad do 

IHEHLD location 

I 

llnatall Ul davica handlar 

I 



.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.BYTE > 
-BYTE 
.BYTE 
.BYTE 
.BYTE 0,0 
.BYTE 0,0 
.BYTE 0,0 



<DPEN-BTART-1 

<CL08E-aTART-l 

<WRITE-BTART-l 

<PTOTAL-START 

>PTOTAL-START 

<CODEND-START 

>CODEND-START 

Inaw HEnLO. . . 

laddraaa 

I davica load. . 

laddraaa 

I DOSVEC aava 

IDOSINI aava 

lay DOSVEC 



.BYTE 0:0, 0,0,!(, 0,0,0 
-BYTE 0,0 

ia placad at ^3100 
Hn to tha old 



Unit DOS 

Ino daciaal aada 

laltar tha 

I 1 ow aaaory. . . 
I pointara 



Ira-paint DOSVEC 



START JBR •FFFF 
DEVICE CLD 

LDA NEWHLL 

BTA HEMLO 

STA LOHEH 

LDA NEUHLH 

BTA HEMLO* I 

BTA L0MEM*1 

LDA HYDOS 

BTA DOSVEC 

LDA HYDOS+1 

STA DOSVEC+l 

LDY #0 Hook far alot 
UINBLP LDA HATABS, Y Igat antry 

CMP ^0 lopan? 

BEQ BOTLDC I yaa! 

INY Ipoint to. . . 

INY Inaxt 

INY lantry 

BNE UIN8LP land kaap looking 
80TL0C LDA • <UHTBL laat up 

STA HATABS+1,Y Ihandlar 

LDA • >UHTBL I in tha... 

BTA HATABS+2,Y Idavica tabla 

LDA N'U icall it U! 

STA HATABS, Y 

JMP •A000 I go to BASIC! 



lUNICHECK 

I 

OPEN 



'OPEN' coda 

PHP 

JSR SAVE 
LDA »e 
STA LCOUNT 
STA TOTLO 
BTA TOTMD 
STA TOTHI 
BTA CHKLO 
BTA CHKHI 
LDA ^2 
BTA X 
BTA LFLAB 
LDA ICDNOZ 
BTA OUTPUT 
BNE ALLDUN 



laava proc atat 
I zaro out . . . 
Ilina countar 
I chackaua total 



I chackaua 

Unit 

laultlpUar 
Inaw llna flag 
Igat U1/U2 • 
I l"acrn 2*prlntar 
I OPEN donal 



lUNICHECK 'CLOSE' co 

I 

CLOSE PHP 

JSR SAVE 
LDA LFLAS 
BNE ALLDUN 
JBR PLTOTL 

ALLDUN JBR RESTOR 
PLP 

LDY MYSTAT 
RTB 



?rac atat 
na? 



I aava ^ 

InaH 11 

I yaa! 

Iprint laat tot. 

Iraatora proc 

laat atatua 
I all dona! 



lUNICHECK 
WRITE 



"WRITE" coda 



.BYTE ^40 Iprintar 
.BYTE »01 lunlt *l 
.BYTE •S? I"W" » wrlta 



PHP 

BTA BYTE 

BTA BYTE2 

JBR SAVE 

LDA •0 

BTA BCDBYT 

BTA BCDBYT+1 

LDX Its Ithia routina 

CLD Iconvarta tha 

LDA BYTE2 I binary byta 

CMP DECTBL, X Ivalua to BCD 

BCC NXTDIB I for aaaiar 



laava proc atat 
laava Incoaing 
Ibyta in 2 placaa 
laava IQCB atuff 
I claar out. . . 
IBCD byta valua 
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O Unicheck 



continued 



PDATLP 



NOTNEU 
CKADLP 



XOK 

EXIT 

I 

land of 

I 

EOL 



SEC 
SBC 
ST A 
BED 
LDA 

cue 

ADC 
ST A 
LDA 
ADC 
BTA 
CLC 
BCC 
DEX 
BPL 
LDX 
BEQ 
LDA 
J8R 
LDA 
CMP 
BNE 
LDA 
STA 
LDA 
STA 
LDX 
LDA 
J8R 
DEC 
BPL 
LDX 
BED 
LDA 
CLC 
ADC 
STA 
LDA 
ADC 
AND 
STA 
DEX 
BNE 
INC 
LDA 
CHP 
BNE 
LDA 
STA 
LDA 
CNP 
BED 
J8R 
PLP 
LDY 
RT8 



lhandl inn 
DECTBL.X Itha BCD valua 
BYTES I l» In BCDBYT 

land BCDBYT+1 
BCDBYT 



BCDADL.X 

BCDBYT 

BCDBYT+1 

BCDADH.X 

BCDBYT+1 

BCDLP 

BCDLP 

LFLAB 

NOTNEU 

BYTE 

PBYTE 

BYTE 

•32 

NOTNEM 

• • 

LFLAS 
•4 

PRTIX 
PRTIX 
PDATA.X 
PBYTE 
PRTIX 
PDATLP 
X 

BCDBYT 

CHKLO 
CHKLO 
CHKHI 
BCDBYT+1 

• «0F 
CHKHI 

CKADLP 

X 

X 

• 4 

XOK 

ei 

X 

BYTE 

tlSS 

EOL 

RE8T0R 

NYSTAT 



llna, print chackaua 



b?S ?§ 



LDA 

CLC 
ADC 
BTA 
LDA 
ADC 
STA 
LDA 
ADC 
BTA 
CLD 

'78 

LDA 
BTA 
LDA 
STA 
JSR 
LDA 
JSR 
LDA 
STA 
BTA 
LDA 
STA 
INC 
LDA 
CMP 
BNE 
JBR 
LDA 
STA 
STA 
STA 
STA 
LDA 
STA 
BNE 



CHKLO 

TOTLO 

TOTLO 

CHKHI 

TOTMD 

TOTMD 

TOTHI 

• 

TOTHI 



forca branch, 

loop back! 

BDC conv dona? 

no, loop back! 

naM lina? 

no ! 

print byta to 

output davica 

gat byta again 

apaca? 

no! 

raaat naM lina 

flag 

now print tha 

word DATA to 

tha output unit 

gat byta, 

print it! 

aora bytaa? 

yup! 

gat aultialiar 

go to daciaal 

add tha BCD 

byta valua to 

tha chackaum 

aaount 

tha AND »»»F 

I ia a aodulo 

1000 oparation, 

ao chkaua < 1000 

add it again? 

raa ! 
nc aultipliar 
gat Mult valua 
S47 

no, it*a laaa, 
>3, raaat it 
to 1 

gat byta again 
and at lina? 
yaa! 

raatora 10CB 
raatora proc. 
aat atatua 
axit! 



T0 
CHKHI 
TOTl 
CHKLO 
T0T2 
JTOTL 

• «2C 
PBYTE 

• 

CHKLO 
CHKHI 
02 

X 

LCOUNT 

LCOUNT 

MIS 

EXIT 

PLTOTL 

• 

TOTLO 
TOTMD 
TOTHI 
LCOUNT 

• 1 

LFLAB 
EXIT 



add chackaua 
to chackaua 
total 



Ino mora daciaal 
Iput chackaua in 
(print work araa 
MT0Ta-TDT2> 



Iprint chackaua 
I gat a coaaa 
Iprint it 
Iraaat chackaua 
I to zaro 

Iraaat aultipliar 
I to 2 

I 1 mora 1 ina 
Igat tt of linaa 
Idona IS? 
Ino. laava! 
Iprint ckaua tot 
I zaro out 
Ichackaua total 



land lina count 
laat Iflag to 1 
I <naM ckaua 1 lna> 
land aKit! 



Iprint 
IHlth I 
I 
PTOTAL 



:hackaua to scraan, 
■ro-auppraaaion 



80TP1 
DI8IT2 



LDA 
STA 
STA 
LDY 
LDA 
LBR 
LSR 
LSR 
LBR 
BNE 
LDX 
BEQ 
INC 
ORA 
JBR 
LDY 
LDA 
AND 
BNE 
CPY 
BEO 
LDX 
BEO 



• 

LEAD0 
PRTIX 
PRTIX 
TOT0,Y 
A 

A 

A 

A 

BOTPl 

LEADfl 

DiaiT2 

LEAD0 

•(30 

PBYTE 

PRTIX 

TOT0,Y 

• •0F 
B0TP2 
»2 

80TP2 
LEAD0 
NXTPT 



Iraaat laading 
I indicator 
land print indaK 
Igat indaK 
land work byta 
lahift ovar 
Itha uppar 
IBCD digit 

I it' a not zaro 
Iprint laading 0? 
ino! 

Icancal auop. 
Iconvart to ASCII 
land print it! 
Igat print indax 
Igat cha byta 
Igat 1 OM BCD 
lit'a not zaro 
llaat digit? 
lyaa, print it! 
lauppraaa zaro? 
lyaal 



B0TP2 

NXTPT 



I 

I l-ahot 
I (araaa< 
I 

CODEND 
DI8KIN 

CASSIN 



INC LEAD0 

ORA ttza 

JSR PBYTE 
INC PRTIX 
LDA PRTIX 
CMP Its 
SHE PTLP 
RT8 



Icancal auop- 
I conv to ASCII 
Iprint it! 
InaKt byta 
Igat potntar 
Idona all 37 



Ino! 
lyaa. 



raturn ! 



vactor changar 
d aftar uaa) 



H0VE21 
H0VE22 



I 

LDA 
BTA 
LDA 
BTA 
LDA 
STA 
LDA 
STA 
STA 
STA 
TAY 
LDA 
STA 
DEY 
BNE 
LDA 
STA 
LDA 
STA 
LDA 
BTA 
LDX 
LDY 
LDA 
STA 
DEY 
BNE 
INC 
INC 
DEX 
BPL 
LDA 
BTA 
CLC 
ADC 
STA 
LDA 
STA 
ADC 
STA 
LDA 
CLC 
ADC 
BTA 
LDA 
ADC 
BTA 
LDA 
CLC 
ADC 
STA 
LDA 



• 1 

BOOT? 
••0& 
TO + 1 

• «30 
FROM+1 

• 

FROM 
TO 
COLDBT 

(FROM) , 
(TO),V 

HQVEl 
MEMLO 
TO 



naw MEHLO hara! 
Idiak antry, aat 
■BOOT flag 
I aova coda. . , 
•to •0&00 
Ifroa *3000 



Iclaar cold atart 



Iput in Y 
Y I aova coda! 



I aova raat. . . 

I of coda. ■ . 
MEHLO+1 I to old MEHLO 
TO+l 

Ifroa •3100 



• •31 
FROM+1 

• t 

• 

(FROM) ,Y 
(TO) ,Y 

M0VE22 

TO+l 

FROM+1 

M0VE21 

MEHLO 

TO 

OPNDLO 
UHTBL 
HEMLO+1 
TO+l 

• 

UHTBL+1 
TO 

CLODLO 

UC 

TO+l 

•0 

UC+1 

TO 

HRTDLO 

UH 

TD+1 



I aova 2 pagaa 
I aova loop 



Inaxt paga 

I all dona? 

Ino! 

Iga old MEHLO, 

laava it, 

I add OPEN off aat 

land aava in 

Ihandlar tabla 

lalao hi byta 



I noM ralocata 
I CLOSE vactor 
land out in 
ihandlar tabla 



InoM ralocata 
I WRITE vactor 
land put in 
Ihandlar tabla 



ADC 
BTA 
LDA 
CLC 
ADC 
BTA 
LDA 
ADC 
STA 
LDA 
CLC 
ADC 
BTA 
LDA 
ADC 
BTA 
LDA 
CLC 
ADC 
STA 
LDA 
ADC 
STA 
LDA 
CMP 
BNE 
LDY 
LDA 
STA 
STA 
DEY 
LDA 
STA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
BTA 
LDA 
STA 
LDA 
BTA 
JMP 
CA88ET LDY 
BTY 
LDA 
STA 
DEY 
LDA 
STA 
LDA 
STA 
LDA 
STA 
LDA 
BTA 
LDA 
STA 
JMP 



•0 

UH+1 

TO 

TOTDLO 



InoM ralocata 

Itotal print 

laddraaa and 



JTOTL+l Iput in JMP 



TD+1 
TOTDHI 
JTOTL+2 
TO 

CENDLO 

NEUMLL 

TO+l 

CENDHI 

NEMMLH 

TO 

•3 

JMPOVL 

TO+l 

•0 

JHPDVH 

BOOT? 

• 1 

CA8SET 

•2 



I vactor (JTOTL) 



InoM ralocata 
I coda and 
laddraaa and 
laava in tha 

Inaw loM aaaory 
Ihold araa 
I (NEWMLLtH) 
InoN aat up 
Ihandlar Inatall 
I vactor and aava 
I in JMPDVLIcH 



Igat boot flag 
Idiak" 



k? 

I no 

I DOS loadad 
D08INI+1 Igat DOS init 
DI8AVE+1 laava it, 
(TO) ,Y Iput in ay JBR 

Irapaat for 

Ihi byta 



Igat old D08VEC 
land aava it 



D08INI 

DI8AVE 

(TO) ,Y 

D08VEC 

DVSAVE 

D08VEC+1 

DVSAVE+t 

TO Igat ay atart 

DOBINl laddraaa and put 

TO+l lin DOB init! 

D08INI+1 

• <HYDVEC Iraplaca DOSVEC 
MYD08 iMlth ay routina 

• >HYDVEC I to raaova 
MYDOB+1 Itha U: handlar 
(JHPDVL) Igo inatall U: 
•2 Icaaa loadad 
BOOT? 

• >MYRTS Igat RTB addraaa 
(TO) ,Y IV put in ay JSR 

• <MYRT8 
(TO),Y 

TO Igat ay atart 

CASINI laddraaa and put 

TQ+1 lin caaa initT 

CA8INI+1 

•«71 Ipoint DOSVEC... 

MYDOS I to aaao pad 

• •E4 
MYDOa+1 

(JHPDVL) Igo inatall Ul 



Now You Can Make Your ATARI 

NEW SPEAK! 

BUILD YOUR OWN VOICEBOX 
UNLIMITED VOCABULARY 

• Uses Allophone-based speech processor 

• All Radio Shack parts 
For beginners and experts 
No Internal modifications to computer required 
Plugs into gameports #1 and #2 
Can be used on all ATARI computers 

For instructions, parts list and sample program, 
send $7.00 check or money order to: 






RAK. 



P.O. BOX 452, STANDARD, CA 95373 
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ASK 

MR. 

FORTH 



by Donald Forbes 



You are now in a position to take over the lectern 
as a FORTH professor and teach a course to begin- 
ners. 

The equipment you will need includes: (1) the class 
textbook — Alan Winfield's 130-page paperback, The 
Complete Forth, from Wiley Press (605 Third Ave., 
New York, NY 10158); (2) your favorite Atari fig- 
FORTH; (3) the accompanying road map to insure 
a safe and comfortable journey for all; and (4) a hat 
you can pass around that's large enough to hold, in 
change, the $16 you laid out for the book. 

If you're ready and your audience is ready, we can 
start right in. 

Hello, class. 

Chapter one is devoted to FORTH fundamentals. 
On page 5, since this is a book about FORTH-79, you 
encounter NEGATE, which you can define with this 
code: 

: HECATE MINUS ; 

You then encounter PICK [page 7) , which can be 
defined as: 

: PICK 2 » SPe + e ; 

and then ROLL, which requires: 




: ROLL DUP 1 = IF DROP EL5E DUP 1 
DO SMAP R> R> ROT >R >R >R LOOP 
1 DO R> R> R> ROT ROT >R >R 
5HAP LOOP ENDIF ; 

Here, incidentally, is a philosophical observation 
on PICK and ROLL made by Leo Brodie in his new 
book on systems analysis using FORTH, called Think- 
ing Forth: 

Some folks hke the words PICK and ROLL. 
They use these words to access elements from 
any level on the stack. We don't recommend 
them. For one thing, they encourage the pro- 
grammer to think of the stack as an array, which 
it is not . . . Second, they encourage the program- 
mer to refer to arguments that have been left on 
the stack . . .without being explicitly passed as 
arguments. . .That's unstructured — and danger- 
ous. Finally, the position of an element on the 
stack depends on what's above it, and the num- 
ber of things above it can change constantly. . . 
Code like this is hard to read and harder to mod- 
ify 

Chapter two describes a simple model of a FORTH 
system as it executes a line of input. You must remem- 
ber (page 13) that VARIABLE in fig-FORTH, just like 
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ASK MR. FORTH corUinued 



CONSTANT, requires an input parameter, so you 

must write the word VARIABLE as VARIABLE— 

unless, of course, you choose to add this definition: 

: VARIABLE VARIABLE ; 

Redefined words, as Winfield notes on page 17, 
may generate an error message, provided you've pre- 
viously added the error messages to your working 
disk. 

The colon definition is the topic of chapter three. 
He points out that "a colon definition may occupy 
more than one line of input and, even though we type 
a 'return' at the end of each line, FORTH does not 
complete the definition and print 'ok' until after the 
terminating semicolon." 

On some FORTH systems, he says (page 27), CRE- 
ATE cannot be used in this way, and VARIABLE must 
be used instead. This means you must replace: 

CREATE array 46 ALLOT ok 
CREATE TABLE -10 , -5 , , 5 , 10 , 
Ok 

with this fig-FORTH code: 



VARIABLE HYARRAY 48 ALLOT Ok 
-10 VARIABLE HYTABLE 
-5 , , 5 , 10 , Ok 

On page 28, you may want to use .DEPTH to print 
the depth of the stack, instead of .S, which has prob- 
ably been predefined in your FORTH to give a non- 
destructive stack print. On that page, you can re- 
define 2- as: 

: 2- 2 - ; 

Winfi eld's definition of CREATE, you must bear 
in mind, holds for FORTH-79 but not for fig-FORTH. 

FORTH structures are introduced in chapter four, 
beginning with IF. On page 33, you may want to re- 
place his line: 

FORTH: A 2 = IF ." A=2" THEN 

with this code: 

VARIABLE A 2 A ! 

: AG A 2 = IF ." A=2" THEN ; 

which will execute correctly. 

The range test (page 35] will work with this defi- 
nition: 



FOR ATARI *400/800/1200/600XL/800XL* 



«^:i;SIL ElSiSS 



For ATARI 800XL, 600XL with 64k. 
Replacement operating system to run the 
vast majority of all ATARI software. No 
translator or disk to load! 
Proper RESET operation especially impor- 
tant for programs like LETTER PERFECT, 
DATA PERFECT, TEXT WIZARD, etc. 
One touch access to extra RAM, all RAM. 
One touch BASIC on. 
Easy plug in installation. 

NOW INCLUDES DUAL OPERATING 
SYSTEM BOARD! 

"Includes MacroMon XL which is an ex- 
cellent, unique monitor for beginner and 
pro alike— written especially for the BOSS. 
$79.95 for 800XL/600XL with 64K*. 



All 
M 



Hen 
acroware 




FRiriTWIZ 



An all machine language text, 
graphics, mixed mode dump for EP- 
SON, GEMINI, NEC, PROWRITER, 
OKIDATA, M-T SPIRIT, 160L, 
KXP-1090, DMP-80, ISD 480, 
SEIKO/AXIOM GP550A. 
Self booting can be used while pro- 
gramming or even running other pro- 
grams. 

Works with or without BASIC, 
ED/ASM, PILOT, LOGO. Calendar 
generator. Horizontal format allows 
text to be continued in same direction. 
Change widths, height, center and 
much more from the keyboard or your 
program. Special handlers for PAINT, 
Micro-Illustrator, LOGO, Micro- 
painter, etc. Includes LISTER program 
for inverted and special characters plus 
demos and ideas. $29.95* 16K Disk- 
All Interfaces. 



diskwiz-ll 

Fast and easy to use repair, edit, ex- 
plore, dup, disk utility package. Single 
load, single or double density. Special 
printout capabilities. 
Repair or change of linked DOS2 or 
OSA -F 2 files, directories, dup 
filenames. Fast searches, mapping, file 
trace. Disassembler, speed check and 
much more! Low priced, fast, easy, 
and powerful! $29.95 16K Disk. 

Send s.a.s.e. for update info. 

•TERMS: U.S. funds; check or M.O. 
add $2.50 shipping/handl- 
ing add 6% CA — 6.5% LA 
COUNTY add $3.00 for 
C.O.D. No charge cards ac- 
cepted add $2.50 foreign 
orders normally out within 
48 hours. 



P.O. BOX 2205/REDONDO BEACH, CA 90278 

(213) 376-4105 

* Tr.ideniark oi Alari, Inc. 
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e VARIABLE K 

: TESTK K e 18 > IF K e 108 < IF 
." yes" THEN THEN ; 

so that 55 X .' TESTX will give ." yes" but any nvun- 
ber outside that range will merely return ok. 

Here is another example of AND on that page that 
you might wish to add: 

DECIIML 77 Ok 

99 Ok 

BINARY .S ( print stack) 

1881181 1188811 ok 

AND . 

1888881 Ok 

The range test further down can be defined as: 

: RANGETEST DUP 8 < 5UAP 188 > OR 
IF ." no" THEN ; 

At the end of this chapter, you must redefine ?DUP 
with: 

: ?DUP -DUP ; 

FORTH loops are covered in chapter five. You can 
print as many as 256 squares beginning with 1, 4, 
9, . . . (page 43] if you change . (dot) to U. , but you 
will overflow if you try 257. 

The word / is needed (page 45) to access the in- 
dex of the outer loop, since it is not defined in fig- 
FORTH, although your version may have it. 

: J R> R> R> R Rtt ! 
>R >R >R Rtl e ; 

The multiplication table will work with 3 .R for 
proper spacing on Atari's 32-character line (instead 
of Winfield's 64-character line). The next page refers 
to &TERMINAL, which looks for the break key in 
Team Atari Forth, but looks for one of the three yel- 
low keys in valFORTH. Since your computer uses 
Atari ASCII (or ATASCII instead of ASCII), you may 
want to substitute 65 (for A) or 90 (for Z) in place 
of the 32 (ASCII space) that Winfield uses on page 
47. The next page requires this definition: 

: 8> 8 > ; 

Note, in closing this chapter, that the word ABORT, 
which corresponds to a warm start, gives the fig- 
FORTH message. 

The sixth chapter discusses saving and loading 
programs. You may want to skip his section 6.2, The 
Editor, since you have your own editor, and pick up 
with his section 6.3, More Block Handling. On page 
59, you should specify a 32-character print line (in- 
stead of 64) in the definition of INDEX. 

You can define the word DATA with: 
VARIABLE DATA 88 ALLOT 
which you can then clear with: 



DATA 48 32 FILL 

or fill with alphabetic characters, with: 

: DATAtt 48 8 DO I 65 + 
DATA I 2 « + ■ LOOP ; 

You will also need: 

: HOVE CHOVE ; 

Then you can choose an unused screen at the end 
of the disk, say screen 60, to define: 

: 5AVEDATA DATA 68 BLOCK DATA 

48 HOVE UPDATE ; 
: LOADDATA 68 BLOCK DATA 

48 HOVE ; 

If you then fill DATA with blanks or alphabetic 
characters, you can execute SAVEDATA and then ex- 
amine screen 60 to verify that the data was moved. 
Conversely, you can edit the beginning of screen 60, 
execute LOADDATA and then use DATA 40 TYPE to 
examine the reverse movement. If you execute 60 
CLEAR, followed by LOADDATA and DATA 40 
TYPE, then DATA should be filled with blanks. 

If you are using valFORTH, make sure that your 
blocks are defined as 1024 bytes and not 512. 

Pause and continue. 

The basics of character input and output, as well 
as number input, are covered in chapter seven. 
You must replace Winfield's definition of: 
: CR 13 EMIT 18 EMIT ; 
with this Atari version: 

: CR 155 EMIT ; 
and, to set tabs, you need to change: 

: TAB 9 EMIT ; 
to read: 

: TAB 127 EH/T ; 
and, to clear the screen, instead of: 
: CLRS 12 EHIT ; 
you'll need: 

: CLRS 125 EHIT ; 

Incidentally, valFORTH uses CLS for the same 
command. 

The fig-FORTH version of CREATE requires: 

: CREATE 8 VARIABLE -2 ALLOT ; 

as Winfield indicates in his footnote, so that you must 
define STRING as follows, and can use 4 ALLOT in 
place of 6 ALLOT (page 66): 

8 VARIABLE STRING 4 ALL8T 

For the Atari, you will need to redefine GETSTR 
in this fashion: 
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t GETSTR 6 DO KEV STRING I + C! 

LOOP ; 

and then you can print the string with PRINTSTR. 
In fig-FORTH, you need to change WORD to read 
WORD HERE, so that the PRINTNEXT definition 
now becomes: 

: PRINTNEXT 32 HORD HERE COUNT TYPE ; 

which is what the footnote (page 67) suggests. As 
Glen B. Haydon notes in All About Forth in a com- 
ment: "Care must be taken in moving source code 
from fig-FORTH to FORTH-79, which includes the 
ideogram WORD. In FORTH-79, WORD leaves the ad- 
dress of HERE on top of the stack. Also, while in fig- 
FORTH, the string is stored at HERE; in FORTH-79 
another buffer may be used." 

Once again, the STRING on page 68 should be de- 
fined as: 

VARIABLE STRING 38 ALLOT 

and then the commands PUTSTR and PRINTSTR 
will work as indicated. 



introduces 




THE 

OPPORTUNITY 

DISK 



We're pretty sure you'll like it. 

For two ninety-five (plus a bucl< for postage) you get to see tfie 
opportunity of a lifetime. Just boot tfie disk into a 48K or 64K 
Atari, and watcti the show. Sound okay so far? Now get this. 

If you don't dig the opportunity, erase the disk and use it. 
You have a sample of SENECOM'S Double-sided, Double- 
density PDQ (Premium Disk Quality), the finest disk on the 
market today. How we doing now? Wait, there's more. 
If you don't dig the disk, send it right back. Your two ninety- 
five will be refunded. No hassles, no delays. We want you to 
be happy after dealing with us! How's that? Hold on. . . 
To your refund will be added the dollar you paid for postage 
and handling. 

So how can you not like it? For Pete's sake, get your order 
in the mail today! 

Send $2.95 plus $1.00 postage and handling to: 

Dept. 27 
13 Whitest. 
Seneca Falls, NY 13148 
NYS residents add 7% sales tax. 

Orders from outside the USA and Canada should add $2.00 postage. 

Atarf^ is a registered trademark of Atari Corporation. 

Senecom® is a registered trademarl< of Seneca Computer Company, Inc. 



On the next page, INSTR uses EXPECT for an in- 
put string (when it's printed by PRINTSTR, your 
FORTH may then put three hearts at the end). 

The definition of INPUT (page 72) should be re- 
placed with: 

: INPUT CR ." ?■■ aUERV 1 HORD HERE 
NUIffiER DROP ; 

In tills connection Haydon, in regard to CONVERT, 
notes: "This ideogram replaces the now obsolete 
(NUMBER) in the older fig-FORTH. As you might 
expect, no error message is given if the numeric text 
converts to a number larger than 32 bits. Any higher 
bits are lost." 

Number topics, including double and mixed pre- 
cision arithmetic, as well as formatted number print- 
ing, are covered in chapter eight. 

FORTH on the Atari will recognize a double num- 
ber if it contains a decimal point, either embedded 
or at the end. This convention differs from that used 
in Leo Brodie's book Starting Forth, which, in ac- 
cordance with polyFORTH usage, looks for (page 164) 
one of these five punctuation characters (: , - . /) 
to place the entered value on the stack as a double- 
length integer. Winfield's second footnote (page 75) 
makes an allusion to this fact. 

Once again, you'll need (page 76) to define: 
: DNEGATE DHINUS ; 

The word U/MOD, which in FORTH-79 divides a 
double number by a single number to leave a single 
precision remainder and quotient, should be rede- 
fined as: 

: U/'HOD U/ ; 

and furthermore, R@, which copies a number n off 
the return stack onto the parameter stack, should be 
redefined as: 

: RC R ; 

Formatted number output (page 80) uses a redefi- 
nition of .$ to print a string, which you may want 
to call .$$ instead; note that the date 310585. will 
print as /31/05/85. The definition of D- in fig-FORTH 

is: 

; D- DNINUS D+ ; 

since D-i- exists in fig-FORTH. You will need: 

; 2DR0P DROP DROP ; 

before the end of this chapter. 

FORTH stands alone in its ability to define new 
structures within the language — the topic of the last 
tutorial chapter, chapter nine. The difference between 
human languages and computer languages is that all 
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human languages are extensible, and computer lan- 
guages are not — except FORTH. 

Because Winfield defines ARRAY and X and TEST 
multiple times, you may prefer to number them se- 
quentially as ARRAYl, ARRAY2, . . .to avoid possible 
confusion over error messages or storage locations 
in memory. You will need to define the first array as: 

* ALLOT 



ARRAVl <BUILD5 
D0E5> 5HAP 2 * 



and < BUILDS replaces CREATE (page 88] in his 

definition of new de/ining word. Here are Atari 

replacements for his defining word definitions: 

: CONSTANT CREATE SMUDGE , ;CODE 
: VARIABLE CONSTANT ;CODE 
( There is no FORTH-79 
C equivalent for ;CODE >^ 
CUARIABLE <BUILDS , DOES> ; 
CCONSTANT <BUILDS C, DOES> Ce : 
2VARIABLE <BUILDS 4 ALLOT DOES> ; 
26 DUP 2* e SMAP G ; 
2, HERE 2 ' 4 ALLOT ; ^ ^ 
2C0NSTANT <BUILDS 2, DOES> 26 ; 

Here are fig-FORTH versions of the double num- 
ber fetch and store operations (page 89): 



20 
2! 



DUP 2* e SHAP e 
SHAP OVER ! 2* ! 



Once again, replace CREATE v«th < BUILDS (pages 

89 and 90). You'll want to define an array called 

READINGS with ten elements as follows, to be used 

later (page 93): 

10 ARRAYtt C array name ) READINGS 
9 READINGS ! 8 1 READINGS ! 
7 2 READINGS ! 6 3 READINGS ! 
5 4 READINGS ! 4 5 READINGS ! 
3 6 READINGS ! 2 7 READINGS ' 
1 8 READINGS ! 9 READINGS ! 

Although WORD became WORD HERE earHer (see 
page 69), the definitions of INPUTS and PUT$ will 
work as shown. 

The CONTINUE? routine to test for continue yes/no 
can be checked with this definition: 

: YESNO S e DO CR CONTINUE? CR LOOP ; 

The definition of AVERAGE (page 93) should be 
changed to 10 DO, because you will be using 0- 
based indexing. 

When you CREATE NULL (page 95), you can look 

at it in memory with HERE 6 - 4 TYPE where the 

inverse L signals the end of the name field. You can 

examine the code in memory for XSQ (page 96) with 

' XSQ . (tic XSQ dot) to find the starting address and 

then define: 

: HEXDUHP C startadr endadi J HEX 

DO I ce . SPACE LOOP DECIMAL ; 

(continued on next page) 




'for all your computing 
CABLE needs . . ." 



* PRINTER CABLES 

* MODEM CABLES 

* ATARI SERIAL BUS 
CABLES 

* CUSTOM RS-232 
CABLES 

* INTERFAST/850 
CABLES AVAILABLE 

* NO CABLE TOO LONG 
OR TOO SHORT 

Fast and Flexible 
Service! 



Dealer/ Distributor 
Inquiries Invited 



Contact your favorite Dealer today 
or call 

I ADVANCED INTERFACE DEVICES | 
P.O. 60X2188 

Melbourne, FL 32902 
(305) 242-2772 



C.O.D. — M.C. — VISA 
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ASK MR. FORTH continued 



and then execute ' XSQ 10 - 50 TYPE. 

The word FIND (page 97) should be defined as: 

: FIND -FIND IF DROP ELSE B THEN ; 

and EXECUTE in fig-FORTH should be one of the 
following: 



in which LIT is a primitive to push the following liter- 
al to the stack. 

The last example in the chapter will wrok with this 
code: 



EXECUTE CFA EXECUTE 
EXECUTE 2 - EXECUTE 



OP 



! CftTS ." cats " i 
.PFA [COMPILE] ' 
,PFA CATS cats Ok 



CFA EXECUTE 



In the definition : TEST 4+ MODE? (page 98), 
omit the final semicolon before hitting RETURN. 

The table of code field addresses (page 99) can be 
executed with this amended (fig-FORTH) version of 
Winfield's code. Note that the example words each 
have five (5) characters, including blanks. 

e VARIABLE VECTORS ] ZERO ONE TWO [ 
: GOVECTOR 18 « ■ VECTORS + 58 - 
CFA EXECUTE ; 

The definition in the fig-FORTH Installation Man- 
ual of LITERAL (if compiling, create literal) is: 

: LITERAL STATE C IF COMPILE LIT , 
ENDIF ; 



Here are some final fig-FORTH definitions to make 
the list complete: 

EXIT R> DROP ; 

NOT 8= ; 

SAVE-BUFFERS FLUSH ; 

D< D- SNAP DROP e< ; 

U< SNAP 8 D< ; 

U. 8 D. ; 

DEPTH f TeaH Atari Forth l 

234 SPe - 2 / ; 

Another (brief) pause. 

Winfield concludes his book with two application 
programs: a largely mathematical calendar program 
and a video game that relies heavily on high speed 
graphics and, as he notes, is implementation depen- 

(continued on page 89} 



DISK WIZARD II 

ic 1984 


Available May 15th ^^initm 

BASIC PLUS 

•: 1985 


THE MOST COMPLETE UTILITY PACKAGE 
FOR ATARrCOMPUTERS AT ANY PRICE 

100% MACHINE LANGUAGE • SINGLE LOAD • MENU DRIVEN 

THIS USER-FRIENDLY PACKAGE INCLUDES THE FOLLOWING POWERFUL 
PROGRAMS FOR THE ATARIMOO/SOO/XL SERIES COMPUTERS (40K REQUIRED) 

DISK BACK-UP ~ SINGLE/DOUBLE DENSITY • SUPPORTS 1 OR 2 DRIVES 
• ALLOWS BACKUP OF DISKS PROTECTED BY BAD SECTORING • FAST COPY 
OPTION • SECTOR STATUS SUMMARY • OPTIONAL PRINTOUT OF SECTOR 
STATUS • DISK MAPPING 

DISK EDIT -SINGLE/DOUBLE DENSITY • DISPLAY/MODIFY/PRINT ANY SEC- 
TOR • SECTOR DISPLAYED IN HEX ASCII/ATASCII • WORKS WITH ANY FOR- 
MAT • SCAN SECTORS FOR A SERIES OF BYTES OR A STRING • DISPLAY/ 
PRINT DIRECTORY • TRACE/REPAIR FILE LINKS • RECOVER AND AUTOMA- 
TICALLY VERIFY DELETED FILES • FORMAT DISKS WITH AUTOMATIC LOCK 
OUT OF BAD SECTORS • DECIMAL/HEX NUMBER CONVERSION 

DISASSEMBLER - single/double density * disassemble from disk 

BY sector numbers • DISASSEMBLE COMPOUND BINARY FILES BY FILE- 
NAME • OUTPUT TO SCREEN OR PRINTER • SELECTABLE MNEMONIC 
DISASSEMBLY WITH OVER 400 STANDARD ATARI MEMORY LOCATION NAMES 

DISK SPEED- VERIFIES/ALLOWS ADJUSTMENT OF DISK SPEED • BAD SEC- 
TORING (810 ONLY) 

*l»0095 SHIPPING & HANDLING 
**'^J^ INCLUDED 


ALL NEW FOR THE ATARI* 
400/800 AND XL COMPUTERS 

ALL THE FUNCTIONS THE PROGRAMMER NEEDS 
FOR FASI bH, MORE EFFICIENT PROGRAMMING IN BASIC. 

• 100% MACHINE LANGUAGE • DISK DIRECTORY 

• PULL-DOWN DISPLAYS • DOS FUNCTIONS 

• AUTOMATIC LINE NUMBERING * qo'i?TROL^^^^°^ 

• UP TO 46 DIFFERENT USER- , q^.^INE ERROR 
DEFINED FUNCTION KEYS DEFINITION 

• TYPE-AHEAD CAPABILITY • INSERT MODE 

• RESTORE CHARACTERS • ADVANCED EDIT FEATURES 

• COPY CHARACTERS • QUICK ENTRY OF 

COMMONLY USED BASIC 

• BLOCK DELETE STATEMENTS 

• LINE RENUMBERING • EASY-TO-FOLLOW MANUAL 

<liO<%95 SHIPPING & HANDLING 
^f^M INCLUDED 


ORDERING INFORMATION f~)Rr)PP TT 
For last delivery, senrj cerlilied >^ n LJ IZ n IV, 

check or money order. ■ — * ^^ -^ ^_^ 

MASTERCARD S VISA ACCEPTED l-ri()(j-/. 
(NY Residenis add 7% sales tax) 1 ^^ Vy V,/ # V 
Plione orders accepted on C.O.D. . mv 
and charges. InfO. 300 Nt 
"ATARI is a registered lrademarl< of Atari Corp. 1 -315-4£ 




32-0320 /S*l^*l^/ 

JC^ \J\JC—\J ^ SOFTWARE. INC. J 

' Residents ,„„ quartz way 

8-0485 SYRACUSE, NY 13219 
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48K Disk 

Requires Action! Cartridge 



GAME 



^^ 




At 25, Mike Stortz is the P. D. Librarian for GRASP, 
the Richmond, Virginia Atari users group. Seeming- 
ly unabJe to find work in the programming field, he 
is working on about thirty projects at once, includ- 
ing a graphic arcade/adventure game. 



Kara Hyke leaves show business after losing out in 
a disputed Oscar award. 
Kara Hyke enrolls at M.I.T. 
Kara Hyke discovers semi-matter. 
Hyke-Grey effect discovered. 
Hyke-Grey drive invented. 
Hyke and Grey found Arcadia on Proxima III. 
Hamner scout ship attacks Arcadia and is driven off 
after extensive damage to the city. Work on the shield 
begins. 
Today: Hamner fleet attacks Arcadia. . . 

Deep in caverns under Arcadia, fuel cannisters of 
semi-matter ore to power the city's defensive shield 
have been cached away against the day when the 
aliens wouJd return. Composed o/ mixed-charge mat- 
ter, hyke (as it is called] is easiJy persuaded to anni- 
hilate itself in the manner of matter-antimatter reac- 
tions, but is more easiJy stored. 

Now that the attack has begun, brave volunteer 
retrievers must don heJipacks, fly down into the caves 
and bring up the ore, so that Arcadia n:\ay not fall. 

(continued on page 27) 
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Lyco Computer Marketing & Consultants 

"PEOPLE WHO KNOW WHAT THEY WANT AND KNOW HOW TO USE IT RECEIVE THE LOWEST PRICES AT LYCO" 



i^ I SAVE — PRINTERS I (^ 



AXION 

GP 550 AT (Atari) I 

GP 550CD(C-64) ; 

"-^550 PC IBM) ; 

' 550 AP Apple) I 

' 700 AT Afari) ■ 

ur- 700 AP Apple) ■ 

Elite 5CD(C-64y : 

BLUE CHIPS 

M12010 $; 

M12010C-64 $; 

C. ITOH 

Prowriler 8510 AP 

8510 BC2 : 

8510 BP1 

8510 SP 

8510 SR 

8510SCP ■ 

8510 SCR 

7500 AP : 

7500 AP 

1550 P - 

1550 BCD 

A-10-20-P : 

F 10 40 PUor RDU I 

F10 SSPU or RDU 11 



CARDCO 

LQ1 369 

LQ3 279 

CITIZEN 



COMREX 

CR-ll-EC Comriler HE Parallel 359 

CR-ll-ES Comriter II E Parallel 379 

CR-IV-C Comriler IV Parallel 689 

CR-IV-S Comriler IV Serial 689 

Corona 

LP300 Laser Prmler .... 2699 
200361 Toner Cartridge . . 89 

DIGITAL 
DEVICES 

1 6K prmler buffer ... 99 75 
32K printer butler ... 1 19 75 
e4K printer buffer 1 69 95 



EPSON 

RX-80 225 

RX-80 FT- 279 

FX100- 579 

JX 80 529 

LQ 1500 P 1089 

LQ 1500 S 1149 

HI-80 Color Plotter 399 

JUKI 

Juki 6100 379 

RS232 Serial Board 55 

Tractor 119 

Sheet Feeder 209 

Juki 6300 769 

LEGEND 

880 219 

1080 239 

1200 249 

* PRINTER * 

INTERFACING 

Available 



MANNESMANN TALLY 

Spirit 80 255 

MTL-IOOL 549 



NEC 8025. 

NEC 8027- 



OKIDATA 

Okimate 10 179 

82A 295 

84 645 

92 349 

93 565 

92 Imagewriter 425 

92 IBM Version 349 



OLIVETTI 

DY 250 Parallel 739 

DY 250 Serial 729 

DY 450 Parallel 1099 

DY 450 Serial 1079 



PANASONIC 

1090 189 

1091 259 

1092...: 395 

1093 589 

3151 459 



Smith Corona 

Faslenl 80 t89i 

D100 219' 

D200 399 



STARMICRONICS 

SG-10 219 

SG-15 379 

SD-10 339 

SD-15 445 

SR-10 489 

SR-15 585 

Powertype 309 

Gemini 10X CALL 

Gemini 15X CALL 

38-10 CALL 



MONITORS 



MODEMS 



DISK DRIVES 



AMDEK 

300 Green 125 

300 Amber 139 

310 Amber IBM 155 

Color 300 Audio 245 

Color 500 Composite 369 

Color 600 429 

Color 700 495 

Color 710 569 

GORILLA 

12" Green 78 

2" Amber 84 

NEC 

JB-1260 Green 95 

JB-1201 Green 135 

-. 1215 Color 235 

; 1216 RGB 375 

JC1460 Color 265 

JB-1205 Amber 139 

PANASONIC 

DT 1300 RGl composite 329 

PRINCETON GRAPHICS 

MAX-12 Amber 189 

HX-12 RGB 475 

SR-12 RGB 599 



SAKATA 

SC-100 Color 

ST&1 Stand 

SG 1000 Green 

SA 1000 Amber 

TAXAN 

210 Color RBG 

115 Green 

116 Amber 

400 Color RGB,. 

410 Color RGB 

420 Color IBM 

121 Green IBM 

122 Amber IBM 

X-TRON 

Comcoior I (."nmptisiic Grcei 

ZENITH 

ZVM 122A Amber 

ZVM 123G Green 

ZVM 124 Amber IBM 

ZVM 131 Color 

ZVM 133 RGB 

ZVM 135 Composite 

ZVM 136 Hi Res Color... 



MICROBITS 

MPP inno E (Alanl .99 00 

HAYES 

Smartmodem 300 .189 

Smarlmoden t?00 .. . 459 

Smartmnden 12006 389 

Micromodem HE 249 

Micromodpm tOO ...289 

Ctironograpti ..179 

Smari Com II ... 75 



INDUS Atari 
$219.00 



DISKETTES 



MAXELL 

MD-1 1699 

MD-2 ?3 75 



5"." SKC-SSSD 
5%- SKC-SSDD 
5"«" SKCDSDf) 



ELEPHANT 

irio> 101 

5V." SSSD 13.99 

5v." SSDD 1599 

5V." DSDD 19 99 



ATARI 

800 XL Computer 

1050 Drive 

1010 Recorder 

1020 

1025 

1027 

850 

SYNAPSE 

(ATARI) 

yndlB 

yncalc 

yncomm 

E- -trend 
chron 
slock 



INNOVATIVE CONCEPTS 

Flip-n-File 10 3.50 

Flip-n-File 15 8.25 

Fllp-n-File25 Lock 17.95 

Fllp-n-File50 17.25 

Flip-n-File 50 Lock 22.95 

Flip-n-File Rom 17.25 

soiol^ii^fOPOSE^^^ 

NATO.." 22.75 

Spitfire Ace 19.95 

F-15 Strike Eagle 22.75 

GRAPHIC TABLET 

Super Sketch 32.95 

Koala Pad 59.95 






CONTINENTAL 

Home Accountant . 44 75 
1985 Book ol Alain Software 16 95 



SUBLOGIC 

Flight Simulator II 32 75 

Night Mission Pinball 18.75 

SCARBOROUGH 

Net Worth 49 95 

Mastertype 24.75 

Improved Mastertype 24.75 

Mastertype's Filer 24.75 



SSI 

Baseball 22.75 

Question 26 75 

50 Mission Crush 22.75 

Broadsides 22.75 

Computer Ambush 34.75 

SPINNAKER 

Delta Drawing Room 19.95 

Cosmic Life Boom 19.95 

Up for Grabs Room 19.95 



ADVENTURE 

Dishev 29.95 

Ultra Disassembler 29.95 



BRODERBUND 

Bank St. Writer 42 75 

The Print Shop 29.95 

Serpent's Star 24.75 

Spelunker 19.95 

Siealth 19.95 

BUSINESS 

VISICAIC $199,75 

LETTER PERFECT R 59 00 

DATA PERFECT $89 75 

FILE MANAGER $69 75 

HOME FILE MGR $69 75 



J TO ORDER ^^ 

CALL TOLL FREE Of send OrdQr to 

800-233-8760 PoVorsor 

Customer Service 1-717-327-1825 Jersey Shore PA 1 7740 



RISK FREE POLICY 

In-stock Item shipped within 24 hours of order No deposit on C O D 
orders Tree shipping on prepaid cash orders within the Continental U S 
PA residents add sales tax APO.FPO and International orders add S5 00 
plus 3% tor priority mail service Advertised prices show 4"^ discount tor 
cash, add 4% for Master Card or Visa Personal checks require 4 m 
clearance before shipDiny All items suhiect to change without notice 
For your protection, we check for stolen credit cards. 
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continued 



R.O.T.O. is a game of coodination, reflexes, timing 
and a hint of strategy that should keep you going for 
a while before Arcadia can claim victory. 

Plug in your Action! cartridge and type in Listing 
1. Action! is forgiving about case, spacing and line 
divisions, so you need not slavishly follow the for- 
mat of the listing (which is compressed somewhat 
for purposes of publication). 

SAVE it before attempting to RUN it! If you try to 
run R.O.T.O. from memory, the source code will be 
overwritten and ruined, causing much gnashing of 
teeth. Because R.O.T.O. is so large, it must be com- 
piled off of disk or cassette. 

For disk. 

After typing R.O.T.O. in, save it with the command 
CTRL-W and type in the filename "ROTO. ACT" then 
RETURN. SHIFT-CLEAR the editor, enter the moni- 
tor with the CTRL-M command, enter C "ROTO.ACT" 
and RETURN. This will compile R.O.T.O. into ma- 
chine language. Now, save the compiled version by 
typing W "ROTO.AML" and RETURN. AML stands 
for Action! machine language. To run R.O.T.O. now, 
just type R and RETURN. In the future, simply type 
CTRL-M to enter the monitor, D and RETURN to go 
to DOS, and then binary loading the file ROTO.AML 
from DOS by using the L command in DOS 2 or DOS 
3— or type LOAD ROTO.AML if you have DOS-XL. 

For cassette. 

Type in R.O.T.O. and save it with the CTRL-W com- 
mand. Do not use the "Screen Off?" option; it will 
upset the tape timing. Rewind your tape, press PLAY 
and RECORD, give the filename 'C:' and RETURN. 

Go have limch while the source code's being saved 
(about fifteen minutes). Come back, clear memory 
with the SHIFT CLEAR, and enter the monitor with 
the CTRL-M command. 

Rewind the tape containing the R.O.T.O. source 
code, press PLAY, type in R "C:" and RETURN. Have 
some more lunch. The computer is rereading the 
source code, compiling it as it does. When it's fin- 
ished compiling, the game will automatically start. 

In the future, you may play R.O.T.O. by inserting 
the tape containing the source code into the record- 
er and typing the R "C:" command. 



Playing R.O.T.O. 

After beginning, you should see the R.O.T.O. logo 
and youi man flying about it, while an explanatory 
message scrolls beneath. You may begin by press- 
ing the START button or the fire button on joystick 
1. You will see a portion of a cavernous network and 
fovir green blocks w^ith Hs on them. This is the fuel 
intake. 




R.O.T.O. 

Cannisters of hyke are scattered about the caves. 
They look like the fuel intake, except that they're 
glowing. Pick up these caimisters by touching them, 
then return to the intake and touch it. This advances 
your score and charges the shield in accordance with 
however many cannisters you've deposited. 

Each caimister is Avorth fifty points. Returning ore 
also refuels your helipack. Picking up more than ten 
cannisters before depositing them will cause their 
m^agnetic fields to interact with explosive results. 

Youj- man moves up, down, left, right and diagonal- 
ly in all directions, although he moves downwards 
faster than up. Moving against the screen's border will 
scroll more caverns into view, although you'll auto- 
matically stop at the far ends of the caves. 

Don't run into a wall, or you'll lose a helipack. 
Watch yoxn: fuel, too. Rimning out will produce the 
expected effect. 
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IV* w* l.*vJ« continued 



Your retriever is also equipped with a molecular 
debonding device to facilitate going through rock. 
Press the fire button to let off a shot. The debonder 
will vaporize any chunk of rock you fire on, but you 
will lose a point for every piece of the caves you elim- 
inate (because you're reducing their structural in- 
tegrity). 

Unfortunately, the debonder will also affect a fuel 
cannister. Rupturing the magnetic bottle containing 
the hyke will produce a large explosion and prevent 
anyone else from retrieving fuel. 

Also, attacks from the alien fleet will shake the 
caves periodically, causing rocks to break loose from 
the ceiling. Shooting rocks is worth one point each 
(for cleaning up). Don't run into them, and be care- 
ful that the tremors don't send you into a wall. 

Pressing any key while a game is in progress will 
pause it. Press another key to resume play. If you 
want to begin again, press START. 

If you play well and retrieve enough cannisters to 
top 1000 points, the shield will have stayed up long 
enough for reinforcements to arrive — and the city 
will be saved. 

On the other hand, if you wreck while hauling can- 
nisters, you could deplete the ore supply so that vic- 
tory is impossible. 

Remember which portions of the caverns you've 
mined out, and definitely recall the way back to the 
fuel intake. The cave network is generated random- 
ly each game, so expect variety. 

R.O.T.O. may end in five ways: 

(1) Most frequently, you run out of helipacks 
(while there are many volunteers, there are only 
three of the sophisticated flying apparatuses). 

(2) The shield is battered down. This happens 
when you don't retrieve enough ore. 

(3) A fuel cannister is shot. 

(4) You carry more than ten cannisters at once. 

(5) The least common. . .Arcadia holds out, 
and the aliens are defeated — this time! 

That's it! 

Action! deserves a word of praise here. R.O.T.O. 
was designed half in advance and half as I thought 
of another feature to put in. The excellent editor made 



even major reshuffling and splitting of routines easy. 

I shudder to think what I would have gone through 
using a conventional assembler. Even when the source 
code became too large to co-reside with the object 
code, I could compile off of my Axlon RAMDisk with 
little loss of development time. 

The author would appreciate any letters of busi- 
ness offers, extravagant praise, or, failing that, con- 
structive comment. Have fun and save Arcadia! D 

Listing 1. 
Action! listing. 

; R.O.T.O. by Mike 5tortz 
SET $88eE=$400e 

5ET 5049i=$4eoe 

DEFINE bytes="64" , 1 ines="80" , 
rock="l94" , PHb_page="128" , 
cb_page="128" , cb_adr="32768" , 
dl_page="136",dl_adr="34816", 
Hisc_page="137",Hisc_adr="35e72", 
sc_page="14e" , sc_adr="35848" 



BYTE 



1^ 

rtclok=Sl4,atract=$4D, lHargin=$52, 

rowcrs=$54,dindex=$57,sdNCtI=$22F, 

gprior=S26F,crsinh=S2F8, 

ch=S2FC,gractl=SD81D. 

hitc lr=SD81E ,Consol=SD81F , 

audCtl=$0288,SkStat=$D28F, 

PMbase=$D4e7 , wsync =$D48A , 

vcount=$D4eB,nHien=$l>40E, 

Chbas=$2F4,chbase=$D489, 

hsc rol =$0484, vscrol =$0485, 

pcolr8=S2C8,pcolPl=S2Cl, 

pcolr2=S2C2,pcolr3=S2C3, 

colpM8=$Dei2,colpMl=$D813, 




colr4=S2C8, 
colpfe=$D816,colpfl=$Dei7, 
COlpf2=$0ei8,COlpf3=$D8J.9, 
C0lpf4=$D81A 

BYTE ARRAY hposp=$0e8e,NXpf=$080e, 
hp0SH=$De84 , PXP f =$0804 

CARO colcrs=$55,savHSC=$58, 

Vds 1 St=$28e , SdSlSt=$23e , 
txtHSC=$294 

BYTE i, j,k,l,cx,cy,x,y,xs,xsM,ys, joy, 
phase, Hc , face, f lag,bak, fore, 
fuel , packs, enable, whine, 
carried, end, cans, fallc, shake, 
shakec 
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BYTE ARRAY Iogo= 

[85 85 88 88 88 88 85 85 

128 96 88 88 88 88 96 128 

5 21 88 88 88 88 88 

128 96 88 88 88 88 88 

G 149 149 2 2 2 2 2 

85 85 88 80 80 80 88 

2 9 37 37 37 37 37 37 

80 84 37 37 37 37 37 37 

85 89 88 88 88 88 

128 96 88 88 88 88 88 1 

88 88 88 88 88 88 21 5 

88 88 88 88 88 88 96 128 

2222222 66 

88 80 88 80 80 80 80 80 

37 37 37 37 37 9 2 64 

37 37 37 37 37 84 88 03, 

cset= 

I 8 124 198 198 198 198 254 124 
56 120 120 56 56 124 254 
124 206 28 56 112 254 254 
254 28 56 28 206 254 124 
28 60 124 220 254 28 28 
254 192 252 14 206 254 124 
124 192 252 206 206 254 124 
254 14 28 56 112 112 112 
124 198 124 198 198 254 124 
124 286 126 14 30 124 120 
56 124 206 206 222 206 206 
252 14 252 206 206 254 252 
124 254 198 192 198 254 124 
248 220 206 206 222 220 216 
126 252 240 192 252 126 
126 252 252 248 224 224 
126 224 224 238 230 254 126 
230 230 238 230 230 230 230 
254 56 56 56 56 254 254 
14 14 14 14 206 254 124 
238 238 252 240 252 238 238 
224 224 224 224 224 252 254 
198 238 254 214 238 238 238 
198 230 246 254 238 230 230 
8 124 198 198 198 198 254 124 
252 6 254 252 224 224 224 
124 198 198 198 204 254 118 
252 6 254 252 238 238 238 
126 248 126 14 254 252 
254 56 56 56 56 56 
230 230 230 230 230 254 254 
8 230 230 230 230 254 124 56 
198 198 214 254 238 198 198 
198 238 124 56 124 238 198 
230 230 124 56 56 56 56 
254 28 56 112 224 254 254 
00000000 

255 255 187 255 223 255 251 255 
60 126 223 253 255 247 126 60 

255 255 255 255 255 123 49 

255 255 255 255 222 158 12 8 
63 127 127 127 63 31 63 127 

127 63 63 31 63 127 63 31 
8 49 123 255 255 255 255 255 
8 12 158 222 255 255 255 255 

254 252 248 248 252 254 252 248 

248 252 254 254 252 248 248 252 

32 88 255 126 68 34 

4 12 30 56 16 16 32 64 

4 10 255 126 34 68 

32 48 128 28 8 8 4 2] , 

ManO= 

[ 254 16 16 28 24 28 20 

24 36 42 46 52 8 

8 16 16 

8 127 8 8 56 24 56 40 

24 36 84 lie 44 16 



Hanl= 

[ 254 16 16 16 20 20 20 

16 48 49 48 48 8 24 16 

16 32 32 32 32 

127 8 8 8 40 40 40 

8 12 140 12 12 16 24 8 

8 4 4 4 4] , 

rotor=t254 124 56 16 56 124 

127 62 28 8 28 623 , 

can=[24 60 126 90 195 195 219 2553, 

dld3ta= 

[ 112 112 112 68 8 Hisc_page 
4 6 11 6 139 483 , 

dldata2=: 

[ 112 70 160 Hisc_page 136 
65 dl_pa9e3 , 

Manadr=i:o 213 ,rotoradmo 63, 

Hissile,Hdata=[3 12 48 1923, 

MX f 4) , Mv C4) , id C20] , ary, screen , dl ist 

CARD PMb,Cb,a,teHP,b,high 

CARD ARRAY table CbVtes) , fal 1 C20) 

INT xd, yd, oxd,oyd,ii, score, Shield 
INT ARRAY HXdC43 



PROC SetUbv=SE45C(BYTE aa,bb,cc) 



PROC UbiankC} 

[$483 ; PHA 

wscrol=ys hscrol=xsHhxsH 
[$681 ; PLA 

[$4C $62 $E43 ; JMP KITVBV 
RETURN 



PROC Dlif} 
BYTE d 

[ $48 

$8A $48 $98 $48 $A5 $AC $48 
$A5 $AE $48 $AS $AF $48 3 

; PHA 

; TXA PHA TYA PHA LDA $AC PHA 

; LDA $AE PHA LDA $AF PHA 

wsync=8 

IF VCOUnt<64 THEN 
chbase=chbasi-2 
colpfO=fore 
colpf4=bak 
IF enable=l THEN 

colpfl=202 

colpf2=frtclok RSH 1)<$3A 

COlpf3=6 
ELSE 

COlpfl=0 

C0lpf2=0 

COlpf3=8 
FI 
ELSE 

chbase=chbas 

COlpfl=202 
COlpf4=64 
FI 



16 



8 



8 







01, 
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lv«U* X*vJ* continued 



I $68 $85 $AF 168 $85 $AE ^ 

$68 $85 IaC $68 $A8 $68 $AA 
$681 

; PLA 5TA $AF PLA STA $AE 

; PLA STA $AC PLA TAY PLA TAX 

; PLA 



E$4e] 
RETURN 



RTI 



PROC HaitCBYTE W) 
BYTE Wl 

wl=rtclok 

DO until rtClOk=Hll+ll OD 
RETURN 



PROC PHSetCJ 

sdMctl=62 gractl=3 hitclr=0 
pcolr0=152 pcoinniB gprior=33 
PMbase=PHb_page chbas=cb_page 
RETURN 



PROC zeroOutC) 

zero (Missile, 1280) 
FOR i=0 TO 3 DO 

hposp(i)=0 hpoSH(i)=e 
OD 

5ndRstC) 
RETURN 



PROC DoPhaseO 

phase==*l 

IF phase=6 THEN phase=0 FI 
RETURN 



PROC CheckShakeO 

IF Rand CO) =255 AND 
RandC5)=0 AND 
Sh3ke=e THEN 

shake=Rand CIO} +18 

Shield==:-Rand(20) 
IF Shield<0 THEN Shield=8 FI 
IF Shield=e THEN end=2 FI 
Plot(159,7} DrawToCshield,?} 
FI 
IF shakecOO THEN 

shakec==-l 
ELSE 

shakec=6e 
IF shakeOe THEN 
shake==-l 
j=Rand(10} 
IF fall(j)=e THEN 

a=tabie (cy) +cx+Rand C20} 
IF screenca}=e then 
fall(j)=a id(j)=rock 
screen ca)=rock 

FI 
FI 

Sound C2 , 255-shake ,2,6) 
xsH=Rand(5) 
ELSE 
XSH=0 

Sound (2, 8, 8,0) 
FI 
FI 
RETURN 



PROC CheckFuelO 

IF (rtclok=0 or rtclok=128) AND 
fuelOO THEN 
DoScoreO fuel==-l 
FI 
RETURN 



PROC DoScoreO 

IF score>iooe then end=5 FI 

dindex=2 

roi«:rs=4 colcrs=l4 PrintBD(6, packs) 

rowcrs=6 colcrs=l4 PrintD(6," ") 

rovcrs=6 colcrs=l4 printlDC6, score) 

dindex=6 

PlotCfuel,5) Plot(shield,7) 

return 



PROC ChargeShieidM 
IF carriedOe then 

shield==*carried LSH 2 

score==+carried«50 DoScorel) 

SndRstC) 

FOR i=l TO 258 Step 10 DO 

sound(3,250-i,io,e) 
Mait(l) 
OD 

Sound C3, 0,8, 8) 
carried=e fuel=58 whine=e 
color=l 

Plot(0,5) DrawTo(fuel,5) 
Plot(0,7) DrawToCshield,?) 
color=0 
FI 

hitclr=0 
RETURN 



PROC EndGaneO 

Zero(Nisc-adr+8e,80) ZeroOutC) 
dindex=2 rowcrs=4 colcrs=o 

IF end=l THEN 

PrintDEC6," NO PACKS LEFT") 
ELSEIF end=2 THEN 

PrintDEC6," SHIELD DEPLETED") 
ELSEIF end=3 THEN 

PrintDEC6," CANNISTER RUPTURED") 
ELSEIF end=4 THEN 

PrintDC6," TOO MANY CANNISTERS") 
ELSEIF end=5 THEN 

PrintDECO," ARCADIA THANKS YOU") 
FI 
PutDEC6) PrintDECe," gaue over") 

FOR a=l TO 400 DO 

SoundCO,a RSH 1,8,6) 
DO UNTIL vcount=128 OD 
FOR i=0 TO 68 DO 
colpfO^vcount-t-rtclok 
Hsyncre 
OD 
OD 
RETURN 

PROC GetDirC) 
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jOV=15! stick CO) Xd=0 yd=8 

IF (joySasOe thek xd=i fi 

IF fjoy&4)<>e THEM Xd=-1 FI 
IF fjoy&23<>e THEN yd=2 FI 
IF CJoySDOe THEM yd=-l FI 
IF xd<>e or ydOO THEN 

oxd=xd oyd=yd 
FI 
RETURN 



PROC Scroll f) 

IF {Joy&4)<>e THEN xs==+l x==+l 
IF xs=8 THEM 

IF cx=0 THEN xs==-l 
ELSE CX==-1 XS=6 
FI 
FI 
ELSEIF fjoy&8)<>0 THEN XS==-1 X==-l 
IF XS=255 THEN 

IF CX=44 THEM XS==+1 
ELSE CX==+1 XS=7 
FI 
FI 
FI 

IF (JoyS2}<>0 THEM ys==+l y==-2 
IF ys=8 THEN 

IF cy=68 THEM ys==-l 
ELSE cy==+l ys=8 
FI 
FI 
ELSEIF Cjoy&DOO THEM ys==-l y==+l 
IF ys=255 THEN 

IF cy=8 THEN ys==+l 
ELSE cy==-i ys=7 
FI 
FI 
FI 
DO UNTIL VCOUnt=128 OD 

ary=ea a=screen+tabletcyJ+cx j=l2 
FOR i=0 TO 17 DO 

dlist<j+lJ=aryCOJ 

dlistCj+2J=aryClJ 

j==+3 

a==+bytes 

DD 
RETURN 



PROC MoveManO 

Zero (pHb+y , 26) Zero cpHb+256+y , 26) 
x==+xd y==*yd 
hpospf8}=x hpaspfl)=x 
IF xd>8 THEN face=8 
ELSEIF Xd<8 THEN face=l FI 

a=PHb4^y+Cphase RSH 2) 
te*K>=Manadrtface) 
NoveBlockCa,ManO+teMP,21) 
MoveBlock(a+256,Hanl+teMP,2l) 

a=PHb-i'y+l 

a==4phase RSH 2 

i=rotor Crotoradr C f ac e) -i-phase) 

PokeCa,i) PokeCaHh256,i} 

SoundfO, phase LSH 2-Cyd LSH 3), 8, 2) 

RETURN 



PROC GoBOOMO 

SndRstO 

ZeroCMissile,2S6) Mxfe)=e hx(1)=0 

HaitC30) 



ary=pHb+y 

FOR i=0 TO 170 DO 

FOR j=l to 28 DO 

colpnO=e4+RandC8) LSH 1 
C0lPMl=64+RandC8) LSH 1 
wsync=8 

OD 

k=RandC24) ary Ck)==&RandCe) 

k=RandC24) ary Ck+25e]==&RandC0) 

Soundfl,i,4j6) 

HaitCl) 
OD 

Zero CpHb, 512) 

sndRstC) pcoire=i52 pcoiri=ii8 
Haitf28) enable=0 
FOR i=0 TO 14 step 2 DO 

fore=46-i 

HaitCS) 
OD 

fore=e Maitfeo) hitclr=0 
carried=8 whine=0 shake=0 face=e 
packs==-l 
IF packs=0 THEN end=l FI 

FOR i=0 TO 19 DO 

screenCfaii Ci))=e 
faiici)=e 

OD 

fuel=50 color=l 
PlotC8,5) DrawToCfuel,5) 
color=0 

x=84 y=lie cx=8 cy=0 xs=7 ys=0 
DoScoreO Scroll!) HoveManO 
fore=36 enable=i 

RETURN 



PROC GetCanC) 

i=X-35 j=y-58 
i==R5H 3 j==RSH 3 
a=tablet j+cy)+i+cx 
IF screen (a) =159 THEN 

screen Ca)=9 

carried3=+l 

IF carried=ll THEN end=4 FI 

whine=2eo hitclr=0 
FI 
RETURN 



PROC FallingfCARD bb) 

j=screenCbb-64) 
IF j=159 OR j=rock THEN 
FOR k=10 TO 19 DO 
IF fallCk)=8 THEN 

fallCk)=bb-64 idCk)=j EKIT 
FI 
OD 
Fallingtbb-64) 
FI 
RETURN 



PROC ZapItCBYTE ZZ) 
atract=8 

l=MXd(ZZ)H^2 

j=ilxCZZ)-31-l RSH 2-XS 
k=MyCz2)-72+ys 
j==RSH 3 k==RSH 3 

Nissi le City Czz) ) ==S255-Mdata fzz) 

HXCZZ]=0 
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XV* vJ* X«vJ« continued 



a=tableccy*k)+cx+j 

IF screen taJ =153 THEM end=3 Fl 

IF screen Ca)=:rock THEM score==*2 FI 

bak=7e fore=12 

FOR j=0 TO 18 DO 

screenCaJ=65 

FOR k=l TO 108 DO OD 

screen CaJ =8 

FOR k=l TO 108 DO OD 

Sound CI, 280, 2, 15- j} 
OD 

bak=e fore=36 screen Ca)=0 
Sound CI, 0,0, 8) 

hitclr=0 score==-l DoScoreC) 
FallingCa) 
RETURN 



PROC BUHPO 

izpxpfCO) j=pxpfClJ 

IF CiADOe OR Cj&lJOO OR 
CiiOJOO OR Cj&8)<>8 THEN 

GoBoomC) 
ELSEIF Ci&2)<>8 OR Cji2)<>e THEN 

ChargeShieldCl 
ELSEIF Ci&4)<>e OR CJ&41O0 THEN 

GetCanC) 



FI 

IF 

IF 

RETURN 



IF HXPfCOJOO THEN Zapit CO) FI 
IF HxpfCDOO THEN ZapItCl) FI 



PROC StartHissC) 

IF StrigC8)=8 AND fla9=0 THEN 
flag=l MC==!1 
IF MX CMC) =8 THEN 

MissileCHyCMC))==&C255!MdataCMC)) 
MyCMC)=y+10 

Mi ss i 1 e CMy CMC ) ) =:=;CMdata Cmc ) 
MxCMC)=Cx+4+face R5H 3)&254 
HXdCMC)=face LSH 2-2 
FI 
FI 

flag=strigC8) !l 
RETURN 



PROC MoveMissC) 

j=2 

FOR i=:8 TO 1 DO 
teMp=MxCi) 
IF teHpOe THEN 

teMP==-MXdCi} hpOSMCi)=teMP 
IF X>teMP THEM 

k=x-teMp 
ELSE 

k=:teMp-X 
FI 

Sound CI, k, 12, 8) 
ELSE 

j"-l 
FI 
HXCi)=teMP 

IF J=8 THEN Sound CI, 8, 8, 8) FI 
OD 
RETURN 



PROC MoveRocksC) 

FOR i=e TO 19 DO 
teMP=faIlCi) 
IF teMpOO THEN 

IF screen cteHp)=8 THEN 

ELSE 

a=teMpi'64 

IF screen Ca)<>8 THEN 
teMP=8 

IF idCi}=15? THEN end=3 FI 
ELSE 

screen CteMp) =8 
screenCa]=idCi) 
teMP==Hhe4 
FI 
FI 
FI 

falICi)=teMP 
OD 
RETURN 



PROC CheckRocksC) 

fallc==-l 

IF fallc=8 THEN 

fallc=28 MoveRocksC) 
FI 
RETURN 



PROC DrawNallCCARD st BYTE cc,in,len) 
BYTE ii,jj 
CARD tt 

screenCst)=l 

tt=st+in 

FOR 11=1 TO len-2 DO 

jj=RandC2) 

screenCtt)=cc+ j j 

tt==*in 
OD 

screenctt)=l 
RETURN 



PROC DrawCavesC) 

SdHCtl=e SdSlSt=dliSt 
Zero Csc_adr , 5128) 
Zero CMi sc_adr , 512) 

FOR i=0 TO 11 DO 

dlistCi)=dldataCi) 
OD 

a=screen j=12 
FOR i=e TO 17 DO 

d 1 ist C j) =64+32*16+6 

dliStCj+l)=a«$FF 

dliStCj+2]=a RSH 8 

j==+3 

a==+bytes 
OD 
dliStCj-3)=128+64+16+6 

FOR i=8 to 7 DO 

dliStC j+i]=dldata2Ci) 
OD 

txtHsc=Misc-adr 

FOR i=0 TO 7 DO 

Poke CMisc_adr+17+i , 75+i) 
PokeCMisc_adr+57+i ,87+i) 

OD 
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roiM:rs=2 colcrs=8 

PrintEC'fuel packs:"! 

colcrs=6 

PrintEC'shield score:") 

PrintEC" by Hike stortz"! 

dindex=6 color=l 
PlottO,5) DrawTotfuel.S) 
PlotC8,7] Dra WTO (shield, 7} 

a=e 

FOR i=0 TO 7 DO 
FOR j=0 TO 15 DO 

k=Rand(32} 

IF (kil6)<>e THEN k==X4 PI 



IF (kSDOO THEN 

DrawHall(a,3,l,4) FI 
IF (kS2)<>0 THEN 

DrawHall(a«3,5,bytes,10) FI 
IF (k&4)<>0 THEN 

DrawMal 1 Ca+57e , 7 , 1 , 4) 

IF Rand(5)=0 THEN 
screen Ca+514>=rock 

FI 
FI 
IF (kS8)<>0 THEN 

DrawMallCa,9,bytes,10) FI 
IF CKil6) <>e AND 

j>0 AND j<15 THEN 

screen (a+5l3J=l59 FI 
a==*4 

+576 



OD 



OD 



FOR a-9 TO 68 STEP 10 DO 
i=CRand(14)+l} LSH 2 
FOR j=i+l TO i+2 DO 
screen (tab le(a}+j)=0 
screen (tab le(a+l)+jJ=0 
screen (tab le(a+2)+j)=0 
OD 
OD 

screen(63}=95 screen(70>=95 
screen(133)=95 screen (134J =95 
PM5et(> 
RETURN 



PROC TitleO 
BYTE t 

Graphics(21} 

PnSetO ZeroOutO 

Zero (Missile, 1280} 

Zero(Misc_adr,3086J 

screen^sawMsc dlist^sdslst 

colr0=156 colrl=146 

colr2=40 colr3=68 colr4=64 

k=e 

FOR i=6 TO 13 DO 
FOR j=8 TO 15 DO 

screen ( j«20+i) =logo (k) 
k==+l 
OD 
OD 

FOR i=6 TO 13 DO 
FOR j=16 TO 23 DO 

sc r een ( j»20-* i ) = 1 ogo (k) 
k==*l 
OD 
OD 



dlist(31}=32 

dlist(32) =64+32+6 

dlist(33)=0 

dl ist(34}=Hisc_page 

b=Misc_adr 

FOR i=35 TO 43 DO 

dliSt(i)=32+6 
OD 

dlist(44}=6 
FOR i=45 TO 52 DO 
dlist(i}=0 
OD 

dindex=0 lHargin=l 
dlist (101=6 

savHSC==+100 

PrintD(6," HHQ "J PrintlD(6,scoreJ 

colcrs=lO 

PrintD(6,"(JBna ") PrintCD(6,highJ 

savHsc=nisc_adr+3oe 
rowcrs=0 colcrs=l 



PrintDE 
PrintDE 
PrintDE 
PrintDE 
PrintDE 
PrintDE 
PrintDE 
PrintDE 
PrintDE 
PrintDE 



t6,' 

(6,"i 

(6," 

(6, 

(6, 

(6, 

(6, 

(6," 

(6,- 

(6, "I 



reserve ore 
transportloperation 

THE CITY OF 
(ARCADIA IS UNDER 
ATTACK.! YOUR JOB. 
IS TO RECOyER FUEL 
CAHNISTERS OF HYKE 
AND RETURN THEM TO 
THE UPPER LEFT END 
OF THE CAUERNS. IF 



savHsc==+400 rowcrs=o coicrsn 



PrintDE (6, "I 
PrintDE(6," 
PrintDE (6," 
PrintDE (6," 
PrintDE (6," 
PrintDE (6," 
PrintDE (6, 
PrintDE (6, "I 
PrintDE(6," 
PrintDE (6, "I 



YOUR SCORE EXCEEDS 
leeO. ARCADIA HAS! 
HELD OUT LONG 
ENOUGH FOR HELP TO 
ARRIVE. DON'T 
SHOOT A CANNISTERi 
OR CARRY MORE THAN 
10 AT A TIME. ANDl 
DON'T RUN INTO A"^ 
HALL. GOOD LUCK! 



savHsc==+4eo rowcrs=0 colcrs=l 
PutDE(6) 
PrintDE (6," 
PRINTDE (6," 



(aa=ffiSTART"J 

imrain'"j 



x=86 y=58 yd=-l xd=0 ys=0 xs=0 
phase=0 1=0 



DO 



IF yd=-l THEN 

yd=8 xd=2 gprior=36 
EL5EIF yd=l THEN 

yd=0 xd=-2 gprior=33 
ELSEIF Xd=-2 THEN 

Xd=8 yd=-l 
ELSE Xd=0 yd=l 
FI 
FOR t=0 TO 39 DO 

IF Xd=-2 and X=158 THEN 

gprior=36 
FI 
IF Xd=-2 and X=116 THEN 

gprior=33 
FI 

MoveMan O 
DoPhaseO 
1==+1 
IF 1=2 THEN 

1=0 ys==+l 
FI 
IF ys=8 THEN 
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XVavJ* x*U« continued 



ys=8 

b==+2e 

IF b=nisc_adr+i32e them 
b=Misc_adr FI 

DO UNTIL VCOUnt=128 00 

dl ist (33) =Peek Ceb) 

dl ist (34) =Peek (ebHKl) 
FI 

Ha it (2) 
IF consol=6 OR strig(0)=8 THEN 

EXIT 
FI 
OD 

UNTIL consoi=6 OB strig(e)=e oi> 
ch=255 SndRstO 
RETURN 



PROC InitO 

skstat=3 audctl=Q high=0 score=8 

NDveB10Ck(Cb_adr, 57344, 1824) 
HoveBlock(cb-adr+128,cset,88) 
HoveBlock(cb-adrHh2e4,cset+8e,288) 
MoveB lock (cb_adr+512,cset+288, 120) 
NoveBlock(cb_adrte32, logo, 128) 
HoveBlock(cb_adr^760,can,8) 

PMb=PHb_page«25e+1824 
HiSSi le=pnb-256 

a=8 

FOR i=8 TO 79 DO 

table(i]=a 

a==+bytes 

OD 

5etUbv(7,Ublank R5H 8,Ublank&$FF) 
vdslst=Dli nHien=192 
RETURN 



PROC LooplnitO 

colr0=68 colrl=48 colr4=64 

screen=sc_adr dlist=dl-adr 

savHSc=Misc_adr 

PMSetO ZeroOutO 

Phase=e face=0 mc=1 flag=8 

cx=0 cy=8 xs=7 »s=8 x=84 y=lie 

bak=0 fore=36 enable=l fallc=l 



^2Sii^ ROCKY MOUNTAIN 



1750 30th STREET 



BOULDER, CO 80301 



HiHm dtnvibc 

I FACTORY AUTHORIZED NETWORK 



EXTENDED SERVICE CONTRACTS 
SALES • CONSIGNMENTS • TRADE-INS 

TO FIND THE SERVICE CENTER NEAREST YOU 

NATIONWIDE — Dial: 1-800-66-ATARI 

IN COLORADO — Dial: 1-800-55-ATARI 

DENVER/BOULDER Metro — Dial: 44-ATARI 

VISIT ELECTRIC LAND: 303/447-ABBS 



packs=3 score=8 fuel=:58 shield=5a 
«hine=:8 carried=8 end=8 
shake=8 shakec=0 xsH=e 
FOR i=8 TO 19 DO 

id(i)=8 fall(i)=8 
OD 

MX (8) =8 MX(1)=8 
RETURN 



PROC GaiteLoopO 

vdslst=Dli nMien=192 

GetDirO 

IF fuel=8 THEN 

yd=2 joy==>;2 
ELSE 

DoPhaseO 
FI 
HoveHan () 

IF X<7e OR X>176 OR 
y<98 OR y>172 THEN 

Scroll () 
ELSE 

Hait(l) 
FI 

CheckFuelO 
CheckShakeO 
CheckRocksO 
StartMissO MoveHissO 
BUMpO 

IF whineOe THEN 

irtiine==-l 

Sound (3 , Mb ine , 10 , 4) 

IF whine=e then 
Sound(3,e,0,8) 

FI 
FI 
IF Ch<255 THEN 

Ch=255 SndRstO 

DO UNTIL Ch<255 OR 

consol<>7 OR 

Strig(0)=0 OD 

ch=255 
FI 
RETURN 



PROC GaneO 

InitO 
DO 

TitleO 

Graphics(e} crsinh=l 

LooplnitO 

DraifCavesO 

DoScoreO 

color=e 

DO 

GaMeLoopO 
UNTIL consolO? OR endOO OD 

IF endOO THEN EndGaneO FI 
IF SCOre>e AND SCOre>high THEN 

high=score 
FI 

OD 

SetUbv(7,SE4,Se2) 
ZeroOutO Graphics (8) 
RETURN 
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SUPERPRINTER 
PACKAGES 

SG-10 Printer and 

U-PrinlA 313 

Citoh 7500AP and 

U-Print A 292 

SD-10andU-PrintA 449 

Panasonic 1091 and 

U-PrintA 364 

Panasonic 1090 and 

U-PrintA 279 

Legend 880 and 

U-PrintA 309 

Prowriter and 

U-Print A 385 

No additional shipping or charge card sur- 
charges in Com. USA 



A ATARI 

ATARI is a trademark of ATARI, INC. 



Atari Inc. has cut all 
hardware and soft- 
ware prices. Please 
call for latest prices!! 



PRINTERS 

Epson 

Riteman 

Silver Reed . . 
Tostiiba1340. 
Toshiba 1351 . 



.Call 
.Call 
.Call 
.Call 
.Call 



Legend 880 239 

Panasonic 1090 209 

Panasonic 1091 285 

Panasonic 1092 419 

Citoh 7500AP 219 

Citoh 8510AP 309 

Legend 1080 259 



.IL 



micronici-inc 

THE POWEH BEHIND THE PRIKTED WORD. 

SG-10 

SG-15 Please 

SD-10 Call 

SD-15 For 

SR-10 Latest 

SR-15 Prices 

Powertype 



RQ. The Party Quiz 19.95 

■i, Call for prices on joysticks, printer cables, blank floppy disks, and other computer 



ATARI MODEM 
SPECIAL 

Hayes 300 &R- Verier ....239 
Hayes 1200 & R- Verier ..Call 

No additional shipping for Modem pack- 
ages in Cont. USA 



MOSAIC 

48KRAM 79.95 

64K RAM/400 134.95 

64K RAM/ 800 + 

Cable Kit #1 144.95 

64K Expander/ 

600XL 99.95 



I 



w 



ACCESSORIES 

Ape-Link 29 95 

Gemini 10X 8K Upgrade Call 

HumptyDump-D 29.95 

Monitors Call 

CompuServe Slarter 27.95 

Vidlex 2995 

Analog Compendium 9.95 

Inside Atari Dos 19.95 

Mapping the Atari 14,95 

Computes 1st-3fd Books 

Atari-EA 12.95 

Printer Stand 15.95 

Omnimon 69.95 

Omniview 80 39.95 

Printer Ribbons Call 

WICO Joysticks Call 

MPP 64K Printer Buller Gal! 

U-Priml6. 32, or 64K Butler Call 

TAC III Joystick 12,95 

Slarlighter Joystick 9,95 

Ramrod XL 99,95 

Monitor Stand Call 

Microlazer Pnnter Buffer Call 

ACTIVISION 

Decalholon-Cart 19,95 

Hero-Cart 19,95 

Pitfall ll-Cart 19,95 

River Raid-Cart 14,95 

Designer's Pencil-Cart 19,95 

Soace Shuttle-Carl 19,95 

Ghostbuslers-D 24,95 

AVALON HILL 

Call for items and prices 

BRODERBUND 

Bank Street Writer-D 49,95 

Loderunner-D 23,95 

Mask of the Sun-D 27,95 

Operation Whirlwind-D 27,95 

Spelunker-D 20,95 

Steith-D 20,95 

Whistler's Brother 2095 

Phnt Shop-D 34,95 

Serpent's Star-D 27,95 

Prim Shop Paper 16,95 

CBS SOFTWARE 

Call for items and prices 

DATASOFT 

Bruce Lee-DT 27.95 

Mictopainter-D 23,95 

LostTomb-DT 23,95 

Letter Wizard t Spell-D 54,95 

Alternate Rea!ity-D 27,95 



c 



DATASOFT (cont'd.) 

Conan the Barbanan-D T 27.95 

MrDo-DT 27.95 

DigDug-D 20.95 

Pole Position-D 20,95 

Pacman-D 20,95 

ELECTRONIC ARTS 

Archon-D 29,95 

Pinball Construction-D 29,95 

M,U,L,E,-D 29,95 

Murder,''Zinderneuf-D 29,95 

OneonOne-D 29,95 

Archonll-D 29,95 

Financial Cookbook-D 37,95 



Music Construction-D, 



.29,95 



Realmlmpossibility-D 29,95 

Hard Hat Mack-D 29,95 

EPYX 

Call for items and prices 

INFOCOM 

Deadline-D 29,95 

Enchanter-D 23,95 

Inlidel-D 29,95 

Planetlall-D 24,95 

Sorcerer-D 29,95 

Starcross-D 29,95 

Suspended-D 29,95 

Witness-D 29.95 

SeaStalker-D 24,95 

Cutthroats-D 24,95 

Suspect-D 24,95 

Hitchiker-D 24,95 

Zorkl-D 24,95 

Zork II or lll-D 27,95 

MINDSCAPE 

Call (or items and prices 

MICROPROSE 

Hellcat Ace-D.'T 23,95 

Mig Alley Ace-aT 23,95 

NATO Commander-DiT 23,95 

Solo Flighl-D.T 23,95 

Spitfire Ace-D/T 23,95 

Wingman-DiT 23,95 

Air Rescue l-D,'T 23,95 

F-1 5 Strike Eagle-DT 23,95 

Crusade in Europe-D 27,95 

Decision in Desert-D 27,95 

Kennedy Approach-D 23,95 



MISCELLANEOUS ATARI 

Diskey-D 34,95 

Ultra Disassembler-D 3495 

Codewnter-D 69,95 

Star League Baseball DT 23,95 

Star Bowl Football-D,T 23,95 

Master Type-D;Carl 27,95 

Flight Simulator ll-D 37,95 

S,AM,-D 41,95 

Castle Wollenslein-D 20,95 

CompuServe Slarter Kit 27,95 

Home Accountant-D 49,95 

Megalomll-D 19,95 

Monkey Wrench ll-Cart 29,95 

Movie Maker-D 37,95 

UBima lll-D 41,95 

Jupiter Mission-D 34,95 

Boulder Dash-DT 19,95 

Scraper Caper-Cart 34,95 

Miner 2049'er-Cart 34,95 

Spy Hunter-CarLD 29,95 

Tapper-Cart/D 29,95 

Up 'N Down-CarlD 29,95 

PicBuilder-D 27,95 

Aslrochase-D 19,95 

Flip-Flop-DfT 19,95 

Sargonll-D/T 16,95 

Odesta Chess-D 49,95 

Millionaire-D 27,95 

Spyvs,Spy-D 23,95 

Adventure Wriler-D 2795 

MMG Basic Compiler-D 69,95 

Summer Games-D 27,95 

Pitstopll-D 27,95 

Gateway to Apshal-Cart 27,95 

Montezuma's Revenge-D 27,95 

Dragon Pern-D 27,95 

Adventure Master-D 34,95 

Get Rich Series-D 34,95 

MPP Modern Driver-D 19,95 

Frogger ll-Cart 24,95 

NetWorth-D 54,95 

Stickybear-D 27,95 

Omnitrend Universe-D 69,95 

Space Beagle-D 23,95 

Adventure Wriler-D 41,95 

Beachhead-D 23,95 

Letter Pertect ■ Spell-D 49,95 

Harcourt Bruce S,A,T,- 59,95 

DataPertect-D 49,95 

Star Wars-Cart 24,95 



MISC. ATARI (cont'd.) 

S,A,G,E, Graphics Editor-D 39,95 

Strip Poker-D 23,95 

Millionaire-D 27,95 

Scroll ol Abadon-D 23,95 

Ultima IV-D 41,95 

Raid Over Moscow-S 27,95 

Micro-League Baseball-D 29,95 

Paper Clip-D 59,95 

HomePak-D 37,95 

Uilimall-D 41,95 

Bounty Bob Sticks Back-Carl 34,95 

B-Graph-D 49,95 

Trolls S Tribulations-D 19,95 

Ball Blazer-D 27,95 

Relurn On Ftaclalis-D 27,95 

Halley Project-D 29,95 

Astral Rilt-D 27,95 

Back To Basic Accounting-D Call 

Qberl's Qubes-D 20,95 

Data Manager-D 19,95 

Electronic Checkbook-D 1 9,95 

Money Manager-D 19,95 

Qbert-Cart 24,95 

Popeye-Cart 24,95 

OPTIMIZED SYSTEMS^„„^ 

Action-Cart 69,95 

Basic XL-Carl 54,95 

MAC/65-Cart 69,95 

MAC ; 65 Tool Kit-D 27,95 

Action Tool Kil-D 27,95 

DOSXL-D 27,95 

C65-D 59,95 

Writer Tool-Can 69.95 

Basic XL Tool Kit-D 27,95 

SCHOLASTIC 

Call for items and prices 

SCREENPLAY 

Call lor items and prices 

SEGA 

Call for items and prices 

SIERRA ON-LINE 

Call for items and prices 

SPINNAKER 

Adventure Creator-D 19,95 

Aerobics-D 23,95 

All in tlie Color Caves 19,95 

Kidwfiler-D 21,95 

Trains-D ,"-,21,95 



To Order Call Toll Free 

800-558-0003 



■ Cassette 
-Disk 
- Cartridge 



For Technical Info, Order 
Inquiries, or for Wise. Orders - 

414-351-2007 



MODEMS 

Hayes Smart- 
modem 300 Call 

Mark XII/1 200 Baud Call 

MPP 1000 E 109 

R-Verter Modem 

Adaptor 39.95 

VolksmoiJem 300 Call 

Volksmodem 1200 Call 

INDUS GT 229 

U-Print Buffered Printer 

Interface Call 

INTERFACES 

Aid interfast I Call 

Ape Face XLPS Call 

R-Verter Modem Adaptor 39.95 

MPP1150 Call 

U-PrintA Call 

accessories, -ix 
R E 

SPINNAKER (cont'd.) 

Alphabet Zoo-Cart 19,95 

Delta Drawing-Can 19,95 

Pacemaker-Carl 19.95 

Fraction Fever-Carl 19,95 

Grandma's House-D 16,95 

Kids on Keys-Cart 19,95 

Kindercomp-Cart 19,95 

Search / Amazing Things-D 21 ,95 

Snooper Troops #1-D 21,95 

Snooper Troops #2-D 21,95 

Story Machine-Cart 21,95 

SSI 

Carder Force-D 41 ,95 

Combat Leader-DT 27,95 

Cosmic Balance ll-D 27.95 

Cosmic Balance-D 27.95 

Broadsides-D 27,95 

War in Russia-D 55,95 

50 Mission Crush-D 27,95 

Questron-D 34,95 

Rails Wesl-D 27,95 

Computer Ambush-D 41 ,95 

Galactic Advenlures-D 41 ,95 

Computer Baseball-D 27,95 

Relorger 88-D 41 ,95 

Objective Kursk-D 27.95 

Breakthrough / Ardennes/D 41 ,95 

Field ol Fire-D 27,95 

Impenal Galactium-D 27,95 

Oper Madiel Garden-D 34,95 

Kamptgruppe-D 41 ,95 

Computer Quarterback-D 27,95 

SYNAPSE 

Alley Cal-D'T 16,95 

BlueMan-D/T 23,95 

Dimension X-D/T 23,95 

Drelbs-D,T 23,95 

Encountcr-D'T 16,95 

Fort Apocalypse-D'T 23,95 

Necromancer-DT 23,95 

New York City-D 19,95 

Pharoah's Curse-DfT 23,95 

Quasimodo-D 19,95 

Rainbow Walker-DiT 23,95 

Relax Stress Reduction Sys 79,95 

Shamus Case ll-D/T 23,95 

Zepplin-D/T 23,95 

Synfile-D 34,95 

Syncalc-D 34,95 

Syntrend-D 34,95 

Synchroo-D 2795 

Syncomm-D 27,95 

Synstock-D 27 95 

Blue Max 2001 -D 23,95 
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nnnFRlNfi information Please soecilv system For fast delivery send casfnier's cfnecl(, morney order or direct bank transfers. Personal and COIvtPUTABILITY 

Company checks allow 2 weeksTod^ COD are $3,00, School Purchase Orders welcome. In CONTINENTAL USA, include $3,00 P,0. Box 17882 

shtoping per software order. Include 3% shipping on all Hardware orders, minimum $3.00, Mastercard & Visa please include card # and expiration Milwaukee, Wl 53217 

da e W ?esidenrs please add 5o/o sales lax": HL AK. FPO, APO, Canadian orders - add S-Zo shipping, minimum $5,00 All other foreign orders^ ORDER LINES OPEN 

please add 15% shipping, minimum $10.00, All goods are new and include factory warranty^ Due to our low prices^^ all sales are ftnal All defective n AM - 7 PM CST 

returns must have a return authorization number. Please call 414-351-2007 to obtain an RA# or your return will NOT be accepted for replacement g^, 12 pm - 5 PM CST 
repair. Prices and availabilily are subject to change without notice. 
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The wheresy 
whys and 
whens of 
softivare 
publishing 



by Russ Wetmore 



Recently, there was a public "CO" (a 
real-time discussion held on Compu- 
Serve, between CompuServe users) in 
the Family Computing Special Interest 
Group, relating to software piracy. A CO 
is, more often than not, just an informal 
get-together of computer enthusiasts. 
Sometimes, as in the case of the Family 
Computing CO, it is an advertised for- 
mal discussion about a particular sub- 
ject, to which industry experts are in- 
vited to impart knowledge to others. 

One of the tilings that came out in tliis 
discussion, which I've heard before, is 
that software is "too expensive." Con- 
sumers, especially in the case of com- 
puter software, sometimes fail to see the 
costs involved in the total production 
and, instead, focus on only the costs of 
the materials involved. "If the disk only 
costs a dollar, and the packaging another 
dollar, how can they justify selling it for 
one hundred dollars?" 

Wholesale vs. retail. 

The concept of wholesale/retail is a 
time-honored one, a direct consequence 
of our free market system. The idea is 
simple. 

A manufacturer doesn't want the mas- 
sive headaches of trying to distribute his 
own product directly to the buying pub- 
lic. Unless the manufacturer is prepared 
to open sales outlets in every town in 
America, he must rely on dealers to sell 



the product for him. That way, the con- 
sumer can go to a local store, see the 
product and ask questions about it be- 
fore purchasing. 

Dealers, however, aren't in it for fun. 
They must make a profit on their sales. 
In order to do tUs, they have to get a dis- 
count from the manufacturer, below the 
normal asking (retail) price. This is 
called "wholesale." 

However, you can imagine what it 
might be like for a manufacturer to do 
business with the thousands of indivi- 
dual dealers — keeping orders straight, 
tracking down the inevitably late pay- 
ments, maintaining technical service, 
etc. It would take a large staff dedicated 
solely to these tasks, not to mention the 
expense and the drain on resources in- 
volved. 

In addition, a pai'ticular dealer would 
have to interact with a different publish- 
er for every individual piece of software 
carried. A store owner would be faced 
with the ominous task of knowing how 
and whom to contact at each publisher, 
keeping track of what had been ordered, 
received and delayed — and on and on. 

A much more sane arrangement in- 
volves companies known as "distribu- 
tors." They deal with many publishers 
(and, frequently, hardware manufactur- 
ers] and make it easy for dealers by offer- 
ing them one place from which they can 
order. Thus, manufacturers only have to 
contact a handful of distributors, whose 
sole job is to interface with all of the 
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On our originol $50, the 
publisher might make $4 or 
$5, if he's lucky and 
everything goes like clockwork. 

It's not as lucrative as it 
sounds — the number 
of software publisher failures 
in the past three years should 
indicate something to you. 



dealers each supports. 

However, distributors aren't in it for 
fun, either. In order to give their deal- 
ers a large enough discount to make a 
profit (and to compete with those rene- 
gade manufacturers who do contact the 
dealers directly), they have to be able to 
offer the same discount themselves. This 
means that manufacturers have to offer 
distributors an even Jai:ger discount than 
the dealer normally gets. 

The cold, hard facts. 

Dealers typically get about a 40% dis- 
count on software. Distributors usually 
get an additional 15% to 20%. This 
means tliat a publisher only makes about 
$20 from a $50 package. 

But you may say, "Twenty dollars is 
a lot of money! All right, so they aren't 
making the whole fifty dollars as profit, 
but twenty is still way too high!" 

Yes and no. Out of that $20 come a lot 
of expenses. (Also, remember that the 
numbers we're talking about in sales 
don't come near to matching the book 
and record album mega-industries.) 

The author gets a cut, in the form of 
royalties. Depending on the publisher, 
these costs can range anywhere from 
2% of the wholesale price all the way 
up to 25%. Some authors make more, 
but not normally with the more estab- 
lished companies. 

The disk costs anywhere from OOC: to 
$1.50, depending on the quality of the 
disk and how elaborate the labelling is. 
The cost of any accompanying docu- 



mentation can vary wildly, from a few 
cents for a paper insert to several dol- 
lars for nicely-bound, color manuals. 
The packaging costs can vary too, de- 
pending on how elaborate that is. 

Okay, after the author's cuts and the 
material costs, the $20 profit turns into 
sometliing like $12 . What about the cost 
to set up the package in the first place? 

Somebody wrote the documentation. 
Somebody drew the illustrations and 
designed the artwork for the package 
and manual. If the package is nonstan- 
dard, there were costs for creating the 
dies necessary to cut the packaging 
materials and documentation. 

There are also shipping costs. Once 
you add all these costs together and 
amortize them out over the life of sales 
of the product, the $12 has turned into 
$10. 

"Ten dollars! Still a lot of money, see- 
ing as they're going to sell millions." 

"No? Okay, hundreds of thousands." 

"No? Well, then . . .one hundred thou- 
sand." 

Guess again. We're talking more like 
thirty to forty thousand for a better-than- 
average seller. 

Why so few, when there are so many 
computer owners out there? Lots of the 
blame for the low amount is attributable 
to piracy, of course. 

Also, studies have shown that people 
who do the most buying of software do 
so within the first 180 days that they 
own their computer. At that point, they 



have either put the thing on a closet 
shelf, have gotten interested in program- 
ming it themselves, feel that they have 
plenty of software already, or have found 
a pirate friend with an adequate supply 
of stolen software. 

For whatever reason, to get back to the 
original discussion, an additional cost 
is advertising and marketing. Most soft- 
ware advertising is done via magazines. 
A typical cost for a full page, full color 
advertisement goes from $2 ,500 for the 
smaller magazines all the way up to over 
$10,000 for the more widely read nation- 
al publications. 

Marketing the product means, basi- 
cally, bringing the product to the con- 
sumer's attention so that he or she will 
go looking for it. Many times, this takes 
the form of displaying at trade shows 
and conventions, rebates, special sale 
prices, and additional discounts or ad- 
vertising subsidies to distributors and 
dealers, to make it more enticing for 
them to push the product harder. 

The publisher generally has a formula 
for how much all of this is going to cost, 
based on tlie projected sales (which, as 
you can probably tell, is more a cross- 
your-fingers, gut-wrenching guess than 
an educated, bankable projection). The 
figure is normally 5% to 15% of their 
expected revenues. 

Okay, now we're down to about $8. 

The publisher generally isn't a single 
person working out of a room in his 
house. He has an office to pay a mort- 
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gage on, rentals like warehouse space 
and vehicles, employees who demand to 
be paid weekly, insurance, equipment 
and its upkeep, utilities like phones and 
power, etc. 

There has to be a small amount ear- 
marked as contingency funds, in case a 
product doesn't go over as big as was 
hoped (you can't expect a winner every 
time). 

With the complex business packages, 
a lot of companies find it necessary to 
send tutors out into the field to teach 
dealers and their employees how to use 
the product, let alone sell it. 

There are taxes, business trips, law- 
suits (you'd be surprised how many crop 
up in this industry) and the myriad oth- 
er expenses usually lumped together in- 
to what's called "overhead." 

So, on our original $50, the publisher 
might make $4 or $5, if he's lucky and 
everything goes like clockwork. 



If a program is a best seller, he might 
see a couple of hundred thousand dol- 
lars as clear profit. If the program is a 
dog or doesn't sell as he thinks it should 
have, he might even lose money on the 
project. 

So, before you cringe at the cost of the 
latest piece of software that you just 
"have" to have, think about what went 
into getting it from the programmer's 
dream to your corner computer store's 
shelves. 

It's not as lucrative as it sounds — the 
number of software publisher failures in 
the past three years should indicate 
something to you. And, as a parting 
note, I think that it's obvious that a lot 
of companies would be a lot healthier 
(and would be able to charge less for 
their products) if consumers didn't steal 
them. D 



Russ Wetmore has been involved in 
the home computer industry for over six 
years. He's probably most widely known 
for his best-selling, award-winning Atari 
game program Preppie! He has also 
shown his talent as a composer/arranger 
whose woi-k has been heard on nation- 
al TV. fiuss is President of Star Systems 
Software, Inc., a research and develop- 
ment firm specializing in entertainment 
and home productivity programs for a 
host of computers. 



National 
1-800-328-1226 

Ask for computer sales 
(orders only) 



SPECIALS 



ORDER TOLL FREE 

Hrs. M-F 10:00-5:30 (CST) 



Pac Man, Star Raiders & pr. Atari Joysticl<s 30.00 

Pac Man or Star Raiders 10.00 

1050 Disl< Drive 160.00 

1 030 Modem 79.95 

Sparta Dos 35.00 

Atariwriter 40.00 

BMC BM12EUY 12" High Res Amber 70.00 

5 1/4" SS/DD Disl< W/Sleevs (25 Pacl<) 29.95 

Kraft Single Button Joystick 8.95 

Kraft Switch Hitter Joystick 9.95 

MPP 1000c Modem 119.95 

US Doubler from ICD 60.00 



MISCELLANEOUS 



ORDERING INFORMATION... 

To order, call toll free or send by mail. For fastest ser- 
vice use your Visa or Master Card (include card # and 
exp. date), or send a money order or cashier's check. 
Allow 2 weeks for personal checks to clear. Add 3% 
(minimum 3.50) for shipping. Minnesota residents add 
6% sales tax. We also ship COD. Return Policy: Call 
Customer Service # For RA #. Credit or defective ex- 
change only. 

Customer Service 61 2-784-681 6 



^^^^^ 



Minnesota 
1-800-626-2345 

Ask for computer sales 
(orders only) 



PRINTERS 



BMC BX80 (BOcps, Friction or Tractor Feed, 

Epson Compatible) 209.95 

Epson RX80 239.95 

Epson RX80FT 279.95 

Epson RX1 00 429.95 

Epson FX80 399.95 

Epson FX100 649.95 

Epson MX/RX/FX80 Ribbons 5.95 

BMC BX80 Ribbon 7.95 

MPP 1150 Interface 69.00 

Cardco AT Printer Interface 59.95 

Atari 850 Interface 139.95 

UPrint Printer Interface 69.00 



MONITORS 




BMC 9191U + 13" Color 

BMC JJ1202G 12" Green 


229.95 

.... 99.95 


= 


BMC Monitor Stand 


24.95 


— 


Interex Monitor Cable (5 pin din to 4 RCA) 


6.95 


— 



LOOK!. 



All software for your Atari Is available at 25% off suggested retail prices. 



/5 T A t^^^V^ Q A I C C 8465 Plaza Blvd. 
Va I M ov^o^ OM L C: O Minneapolis, MN 



Minneapolis, MN 55432 
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ASTRA 1620 

ASTRA SYSTEMS 

2500 South Fairview, Unit L 

Santa Ana, CA 92704 

(714) 549-2141 

Approx. $325.00 



by Jim Haney 



When I purchased my Atari 800 two 
years ago, an Atari 410 recorder served 
as the mass storage device. We are all 
painfully aware of this device's limita- 
tions — slow I/O times and the inability 
to name files. After several months and 
much explaining to the family financial 
plamier (commonly known as "wife"), 
funds were provided for the purchase of 
an Atari 810. 

The increase in speed, reliability and 
storage capacity was phenomenal. The 
addition of the 810 actually raised my 
Atari from a simple game machine to a 
viable computer system capable of word 
processing, financial management and 
many other high-level programs. 

My system kept expanding; the addi- 
tion of an 850 interface, printer and mo- 
dem, with the attendant growth of soft- 
ware, soon caused dissatisfaction with 
the limitations imposed by having only 
one disk drive. Each month when ANA- 
LOG Computing came, hoiu's were spent 
drooling over advertisements for drives. 

There were drives which displayed 
readouts and flashing tri-colored LEDs. 
However, they all had one major flaw: 
only one drive. There was no way to 
convince the financial plamier to buy 
another single unit drive. Then I saw it! 
The Astra 1620 appeared— the answer 
to my dilemma. 

The package arrived, extremely well 
packed. The Astra 1620, as received, 
comes with several things that I feel ai'e 
worthy of comment. The interconnect- 
ing cable is approximately five feet long, 
allowing the flexibility needed to place 
the drive conveniently. Also, as the pow- 
er supply is contained within the unit, 
a six-foot cord aids in this flexibility. 

The Astra's physical measurements 
closely approximate those of one 8iO, 
but, in double density mode, it's equal 



to four of them. Installation in the cabi- 
net section of my L-unit desk was ac- 
complished with ease. The 1620 rests on 
the same shelf previously occupied by 
the 810. 

Two other items of note were the in- 
clusion of software, SMARTDOS and 
HOMEWRITER. SMARTDOS is now 
the only DOS I use. 

It is menu-driven, similar to Atari 
DOS 2.0. However, at that point the sim- 
ilarity ends. SMARTDOS allows such 
feats as testing individual sectors and 
duping those sectors. Try that on youi- 
810. 

The Astra 1620 is a no-frills unit en- 
closing a power supply, two half-height 
drives and a controller board. The con- 
trol panel consists of an on/off switch 
with a red LED. Each half-height drive 
also contains on its front panel one LED. 

On power-up, the drives' LEDs glow 
momentarily. The 1620 is virtually si- 
lent. Even if reading unformatted sec- 
tors on commercial programs, nary a 
sound is heard. 

The rear panel contains the standard 
Atari connector for attaching interfacing 
cables. There is also an additional con- 
nector for daisy-chaining other Atari 
items, such as an 810, 410, etc. My old 
410 remains happily connected to the 
rear of the Astra and accepts all com- 
mands from the 800. 

I mentioned that the 1620 was a no- 
frills drive. Well, let me qualify that. It 
doesn't give digital readouts of sectors 
. . . SMARTDOS does. A full explanation 
of SMARTDOS would require a separate 
review, and I really want to discuss the 
Astra itself, as well as the superb sup- 
port offered by its manufacturer. 

The bottom line — have I encountered 
any difficulties with the Astra? Yes. Blue 
Max, a commercial program, would not 



work with the 1620. This is the only 
commercial program with which I've 
had problems. My Astra is an early 
model and, as such, did not have the 
modifications which are currently built 
into those now being shipped. 

I also had a complete disk drive fail- 
ure. The Astra uses belt-driven drives. 
After about six months, the screw which 
holds the driven flywheel worked loose, 
allowing the belt to come off. Since I'm 
an FCC-licensed technician and didn't 
want to spend $45.00 an hour, I decided 
to open the beige box myself. 

I found the loose screw, replaced it 
and re-installed the belt (the locktight 
applied by the factory had apparently 
missed its mark; the second drive was 
tight), and the drive worked perfectly 
sitting on my desk sans cabinet. 

The controller board is inverted be- 
low the second drive, its front edge near 
the on/off switch. Upon re-installing the 
drives in the cabinet, contact was made 
with this swith and the controller board. 
When the power was applied, our house 
plunged into darkness! 

I relate this to warn those who may 
have an early model Astra. I was now 
without a drive and back to the 410 (for 
which I had no backup copies). Disas- 
sembly bore out my worst fears. The 
llOV house current had lifted one resis- 
tor, burnt through a ground bus, then 
sent unwanted voltage to all the compo- 
nents. The board was shot. At this point, 
I deemed a call to Astra in order. 

I was connected to Mr. Drew Feather- 
son, an Astra executive. On hearing my 
problem, he promised to swap boards 
for a mere $50.00 plus tax. I was elated; 
controller boards do not come cheaply. 

The factory is located in Santa Ana, 
a mere twenty miles or so for me. One 
note: you must call Astra prior to show- 
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J Review continued 



ing up or shipping equipment back, as 
you need a Return Goods Authorization 
number. 

On arrival, I was impressed by the 
friendly and very helpful attitude of 
these busy people. Drew was interested 
in my problem and offered a tour of the 
manufacturing facility. I-Ie pointed out 
several modifications which have been 
made since my model sat on the assem- 
bly line. 

One caught my eye — the heat shrink 
tubing placed around the on/off switch 
to prevent just such an accident as mine. 
He also indicated additional venting 
areas molded into the newer cabinets. 
Although my drive has never exhibited 
any problems attributable to heat. Drew 
explained that it was more for the own- 
ers' peace of mind. Also noted was the 
strengthening of the cabinet at several 
critical points. 

I related my problems with Blue Max 
and was told that the correction was 
simple. At the time of manufacture, my 
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a SASE or call our 
BBS for inforMation 
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drive's speed was set at 300 RPM. Slow- 
ing the drives to 290 RPM would cor- 
rect my problem. All drives currently 
made are set to this speed. 

Back at home, I covered the errant 
switch with heat shrink tubing, then re- 
installed the new controller board and 
voiJa! The disk drive was recognized by 
the 800 once again. 

The speed of the drives can be adjust- 
ed by turning the small brass screw that 
protrudes from the multi-turn potentio- 
meter at the underside of each drive. 
These potentiometers are located next 
to bright orange capacitors. SMARTDOS 
has a speed check program included. 

To perform this speed reduction re- 
quires that your drives be completely 
outside their cabinet, along with the 
controller board. Do not attempt it if you 
don't feel completely qualified, or you, 
too, may have to pay a visit to the Astra 
plant. 

When I finished the adjustments. Blue 
Max loaded and performed exactly as it 



LOW COST 

HOME SOFTWARE 
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HOME OFFICE 

Word Processor 
Data Base/ Mail List 

RECREATION 

Orbiting Body 
Color War 
Connectr 
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SING-A-LOIMG 

Enter & Play Music 
Display Lyrics & Graphics 

UTILITIES 

Online Terminal 
Sector Copier 
DOS with BASIC 
many more 




Diskettes for ATARI 400,800,X L,XE 
Includes instructions & documentation. 

$ 8.95 Each 1st Class 

All 4 for 29.95 u. s. Delivery 

Please add 1 .75 for postage & handling 



MISTY MOUNTAIN SOFTWARE 

P.O. BOX 523 
LITTLETON ,00 80162 




did on the 810. All my other programs 
to include Flight Simulator II from sub- 
LOGIC perform flawlessly on the Astra. 




Astra 1620. 

Am I satisfied with the Astra 1620? 

Completely. Would I buy another prod- 
uct from them? Absolutely. For the mon- 
ey, you simply can't beat the Astra 1620. 
With other single-drive units selling for 
$398.00, you can pay only $67.00 more 
and have a two-drive unit — with the 
caoability of four Atari 810s. 

I'd say you can look for some great 
equipment from our friends at Astra. 
Not only is the 2001 on the market, but 
Drew and his company have just started 
shipping something called the Big D. 
Stay tmied for more! D 
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Lunar Patrol 







>JF^ 



'«^ 





^S3^ 



11 is llie year 2036. The newest 
I lage in the international Olym- 
pics is the contest called Lunar 
Patrol. You've been chosen as the 
an pilot for this race, taking off from 
— ijie C]iavius_mooabase, your mission is twofold. First, 
j^iist go thtough the circuit, landing on as many of the ten pads 
aspos.siblc in the least time. Second, you must do this using as little 
^lel as possible. As an added fillip of danger (we have to kj^p Ihe 
folks at liomc! happy), this contest could cost your life. ^ 
I Setting up the game. 

' Immediat(!ly after typing in the program, SAVi.-; it. Once this is done, 
r you may Rt IN it. 

Lunar Patrol is designed to run on 24K but can be made to run on Kil^ 
if Line 80n is changed to 800 POP -.CCrVO 450 and all lines after that are 

deleted. 

If you have 24 K or nicjre. then you can create your own screens. IJ 

characters I've set up (or you might add your own) and simple PK1K-. _ _ _ 

ments, you can make your own lunar bases. Starting at LiftJUH^ycDU may add 

IS many screens as you like, memory permitting, but you must do the following: 



^jjijjgjjjgjjjg^jjjjij 
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corrtinued 



(1) Give the colors of the screen in the vari- 
ables CLl and CL2; 

(2) If you have a fuel tank on your screen [only 
one], you must give its screen X and Y coordi- 
nates to the variables FX and FY, respectively; 

(3) The next screen must be fifty lines higher 
than the start of the last screen, and must be 
within a fifty-line limit, with a RETURN state- 
ment; and 

(4) Finally, fifty lines higher than the start of 
the last screen, place the commands POP .GOTO 
450 

This last command gives the computer a line num- 
ber to reach, erases the GOSUB, and goes to the con- 
gratulation screen. 



Program 

Lines 40-125 
Lines 130-150 
Lines 155-180 
Lines 185-190 
Lines 195-225 
Lines 230-277 
Lines 280-355 
Lines 360-440 
Lines 450-470 
Lines 500-900 



description. 

Main loop. 
Landing routine. 
Crash routine. 
Fuel up routine. 
End game routine. 
Initialize VBI. 
Character set. 
Title screen. 
Congratulations screen. 
Game screens. 



Playing Lunar Patrol. 

Lunar Patrol is a one-player game requiring a joy- 
stick in port 1. 

When the program is first rrm, there will be about 
a thirty-second delay as the VBI (vertical blank in- 
terrupt] and character data is read in. Once the game 
is ready, the computer will buzz, show you the previ- 
ous high score and give you some options. 

You can choose the starting screen by pressing OP- 
TION. Pressing SELECT will increase the gravity 
pull. Press START or the trigger, and Lunar Patrol 
will begin. You may return to the title screen by 
pressing any of the console keys. Pausing the game 
is accomplished by pressing the SPACE BAR. Hit- 
ting it again will resume the game. Moving the joy- 
stick left and right rotates the ship left and right, 
respectively. Pressing the trigger will thrust the ship 
in the direction it's facing. 

The object of Lunar Patrol is to maneuver your ship 
down into the lunar cavern and land it at the base 
(the grey landing pad) with the nose up. . .easier said 
than done. 

Although you're given five points for about every 
second you are alive, you must keep a constant eye 



on fuel. You are allotted 500 units to land at all eight 
bases! This fuel is used up quickly, so don't waste 
time, for if you run out, you'll smash into the lunar 
cavern — and will have to say good-bye to one of your 
three ships. 




Lunar Patrol 

But don't worry too much; there are fuel reserves 
on each screen (that flashing tank). They give you 
200 units of fuel and 300 points. You lose a ship 
whenever it touches anything but a fuel reserve or 
the landing pad. After all three ships are lost, the 
game is over. An ending screen tells you your score 
and whether it was a high score or not. 

Pressing START or the trigger will bring you to the 
title screen. If all screens were completed, a 10,000- 
point bonus is awarded, you receive a full tank of 
fuel and will start over with the gravity increased. 

About the game. 

Confidentially, starting with the first screen, the 
farthest I've ever gotten is the seventh screen. I tried 
to make the game as difficult as possible, but not im- 
possible. Lunar Patrol makes extensive use of Boolean 
algebra to help it run faster. 

The BREAK key was turned off to stop a prema- 
ture ending of the game. I did this with two POKEs 
in Line 10 which change the interrupt vector for the 
BREAK key. Disabling the key this way means that 
you don't need to rePOKE after a graphics statement. 

I've chosen an excellent VBI routine (Lines 230-277 
by Sid Mier. It uses one USR call, then you have full 
control over horizontal and vertical movement. It al- 
lows you to instantly display another area of the play- 
er with simple POKEs. I would like to explain it, but 
there is too much to it. For a full explanation, see 
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COMPUTEI's First Book of Atari Graphics. 
Well, that's Lunar Patrol. I hope you enjoy it. D 

High school /reshman Michael /. Coulson is an 
honor student in New Jersey. With the aid of many 
books, he taught himself BASIC and is currently 
studying 6502 machine language. He's had a com- 
puter for one and a half years, and finds program- 
ming a challenge. 

BASIC listing. 



LUNAR PATROL 



1 REM 

2 REM bv Michael J. Coulson 

3 REM for ANALOG CoMPUting nagazine 

4 REM 

18 READ C1,C2,C3,C4,C5,C6,C7,C8,C3,C10 
, C16 , HCR : CH5L=HCR+C1 : POKE 566 , 143 : POKE 

567,231 
11 DATA 1,2,3,4,5,6,7,8,9,18,16,53278 
15 DIM H5StC18J :PLX=53248:PLY=178e:H5S 
="\M" •■ GP=C2 : C28=28 : C128=128 
28 5C=Cl:G05UB 368:FUEL=506 :5C=C8 !LF=C 
3 

25 POKE 559, C8:? "H":P05ITI0H C8,23:G0 
5UB SCREEN: POKE 788, CLl: POKE 789,C8:P0 
KE 718,CL2:P0KE 559,62 

38 POSITION C8,C8:? "SHIPS"" ; LF-Cl :POS 
ITION 13, C8:? "SCORE-" ;SC: POSITION 29, 
C8:? "FUEL-";FUEL:POKE PLL,C7 
35 DRAM=15 : X=78 : V=45 : DV=8 . 01 : D«=C2 ; POK 
E PL}(,X:POKE PLY,Y:POKE PDR,DRAH:POKE 
53252, C8:P0KE HCR, CO 

48 A=STICKtCOJ :B=STRIGtCOJ :POKE 77, CO: 
IF MOT FUEL THEN SOUND Ce,CO, CO,Ce :G0 
TO 55 

45 IF NOT B THEN DX=DK+ CDRAH=C8 OR DR 
AM=15 OR DRAH=22)/C5-CDRAH=58 OR DRAM= 
43 OR DRAM=36]/C5: SOUND C0,ie8,C8, C18 
58 IF NOT B THEN DY=DY+ (DRAH=3e OR DR 
AH=29 OR DRAH=22)/C18-tDRAH=Cl OR DRAM 
=58 OR DRAH=C8}«8.3 
55 IF B THEN SOUND C8,C8,C8,C8 
68 DHAH=DRAM-tA=llJ*C7+fA=C7}«C7:IF DR 
AH<C1 THEN DRAH=58 
65 IF DRAH>5e THEN DRAN=C1 
78 DY=:DY+8.1:IF ABSfDY)>GP THEN DY=SGN 
CDY)«GP 

75 DX=DX-SGNCDX}*8.82:IF ABSCDX>>C2 TH 
EN DX=SGNfDX}«C2 

88 X=X+DX:Y=Y+DY:IF X<48 THEN X=280 
85 IF X>288 THEN X=48 
98 IF Y<45 THEN DY=ABSCDY> 
95 POKE PLX,X:POKE PLY,Y:POKE PDR,DRAH 
:HIT=PEEKC53252J:IF HIT THEN POKE HCR, 
C8:G0T0 138 
188 SC1=SC1+C1:IF SCl/C18=INTfSCl/C18> 

THEN SC=SC+C5: POSITION 19, CO:? SC:SC1 
=C8 
185 F1=F1+8.5:IF F1/C8=INTCF1/C8J THEN 

FUEL=FUEL-C8:FUEL=:FUEL«CFUEL>-C13:P0S 
ITION 34, CO:? FUEL;" ":F1=C8 
110 POKE 711, PEEK tC283 

115 IF PEEKCCNSLJOC7 THEN SOUND C8,C8 
,C8,C0:G0T0 C28 

128 IF PEEKC764J=33 THEN POKE 764,255: 
SOUND C«,Ce,C8,C8:F0R I=C8 TO CI STEP 
C8:IF PEEKt764J<>33 THEN NEXT I 
125 POP :POKE 764, 255: GOTO 48 
138 IF HITOC2 OR DRAHOCI THEN 155 
135 Y=Y-C1:P0KE PLY,Y:IF PEEKC53252) T 
HEN POKE HCR, C8: GOTO 135 
148 POKE PLY,Y+C1 



145 FOR I=SCREEN-C18 TO C8 STEP -C18:F 

OR J=C1 TO C2:S0UND C8, 158,018, C18:NEM 

T J:P0SITI0N 14, CIO:? " BONUS ";l;" " 

158 SC=SC+Clfl:POSITION 19, C8:? SCSSOUN 

D Ce,CO,CO,CO:NEXT I:POKE PLX,Ce:POKE 

HCR,C0:SCREEN=SCREEN+5e:GDT0 25 

155 IF HIT=C8 THEN 185 

168 IF HIT=C7 OR HIT=15 THEN 188 

165 FOR 1=65 TO 79 STEP C3:S0UND CO, 25 

8,C8,ABSCI-79J :SOUND C1,288,C2, ABSfI-7 

9}:P0KE 712,l:P0KE PDR,I 

168 FOR J=C1 TO Cie:NEXT J 

178 NEXT I: POKE 712, CO: SOUND C8,Ce,C8, 

C8: SOUND CI, Ce, CO, CO: POKE PLX,CO:POKE 

PLY , CO : POKE PDR , CI : LF=LF-C1 : FUEL=50e 

175 IF LF>Ce THEN 30 

180 GOTO 195 

185 FOR 1=15 TO CO STEP -C3: SOUND CO, 5 

8 , C18 , I : NEXT I : SC=SC+308 : FUEL=FUEL+288 

;IF FUEL>758 THEN FUEL=758 

198 POSITION FX,FY:? " ":P05ITI0N 19, C 

0:? SC:POSITION 34, CO:? FUEL:POKE HCR, 

CO: GOTO 48 

195 G RAPHICS 17; POKE 82.Ce: P0KE 87. CO; 

o 11 i ' Ji ' j ' « ' jf« ' * ' * ' * ' i ' Ji'* ' »'J ' Ji ' J n . 1 11 I'lillM'l 111 1 1 1 

^J^.. '!*j? ' V.' ' '^ i M i I i l ' l ' I i l i I ' l - * = »M . » . ..i .. "' ' '*'''^^**" 

288 ? :? "YOU DID HOT COMPLETE":? " 

YOUR MISSION" 
285 IF SOHS then POSITION C2,C7:? "ne 
If high scoreH':HS=SC 
218 HSS= STR$CHS> ; POSITION C2,C9;? 
liWJJJ JJL! " : HS : POSITION C2,Cie:? 

aHair*Tsc 

215 FOR I=C1 TO LENCHS5} :HS$(I,I)=CHR$ 

CASC (HS$ CI) ) +0128) : NEXT I : HS$ CLEN CHS$) 

+C1J="|" 

228 IF PEEKCCNSL}=C7 AND STRIGtCO) THE 

N 228 

225 GOTO C28 

238 PM=PEEKC186)-32:P0KE 7e4,12;PLL=17 
84:P»ffiASE=256«PM:IF PEEK C1536} =162 THE 
N 250 

235 RESTORE 255: FOR 1=1536 TO 1786 :REA 
D A;P0KE I,A;NEXT I:F0R I=1774 to 1787 
* POKE I CO : NEXT I 

240 F0R'i=PMBASE+1023 TO PMBASE+2847:P 
OKE I,C8:NEXT I :DRHBAS=PNBASE+Cl 
245 FOR J=Ce TO CIO: FOR K=DRHBAS+J*C7 
TO DRHBAS+J«C7+C6:READ A: POKE K, A: NEXT 
K'NEXT J 

258 POKE 559,62 :POKE 623,C1:P0KE 1788, 
PH+C4:P0KE 53277, C3:P0KE 54279, PM:PDR= 
1772:P0KE 1771,PM:X=USR tl696) :RETURN 
255 DATA 162,3,189,244,6,240,89,56,221 
,248,6,248,83,141,254,6,186,141 

257 DATA 255,6,142,253,6,24,169,8,189, 
253,6,24,189,252,6,133,284,133 

259 DATA 286,189,248,6,133,283,173,254 
,6,133,285,189.248,6,178,232,46,255 
261 DATA 6,144,16,168,177,203,145,205, 
169,0,145,283,136,282,288,244,76,87 
263 DATA 6,168,8,177,283,145,285,169,8 
, 145 , 283 , 288 , 282 , 288 , 244 , 174 , 253 , 6 
265 DATA 173,254,6,157,248,6,189,236,6 
, 248 ,48,133, 283 , 24 , 138 , 141 , 253 , 6 

267 DATA 189,235,6,133,284,24,173,253, 

6,189,252,6,133,286,189,248,6,133 

269 DATA 285,189,248,6,178,168,8,177,2 

83,145,285,200,282,288,248,174,253,6 

271 DATA 169,8,157,236,6,282,48,3,76,2 

,6,76,98,228,0,0,184,169 

273 DATA 7,162,6,168,8,32,92,228,96,8, 

8,28,28,28,62,8,8,6,94,68,28,8,4,8,32, 

68,63,68,32,8 

275 DATA 4,8,28,60,94,6,8,8,62,28,28,2 

8,8,8,16,8,28,38,61,48,8,8,2,38,126,38 

,2,8,0,48,61,38,28,8,16 
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continued 



277 DATA 0,1,3,23,18,29,2,8,1,23,1,4,3 

2 
288 CH5ET='cPEEK(ie6)-C8)«256:RE5T8RE 3 
85 

285 IF PEEK tCHSET+768) =282 THEN RETURN 
298 READ C:IF C=-C1 THEN ? "Q": RETURN 
295 FOR J=C8 TO C7:READ A: POKE CH5ET+C 
*C8*J,A:HEXT J 
388 GOTO 290 

385 DATA 16,8,168,136,136,136,136,168, 
8,17,8,32,32,32,32,32,32,8,18,8,168,8, 
168,128,128,168,8 

386 DATA 19,8,168,8,48,8,8,168,8,28,8, 
136, 136, 168, 8,8,8,8 

318 DATA 21,8,168,128,168,8,8,168,8,22 

,8,168,128,168,136,136,168,8,23,8,168, 

8,8,32,32,32,0 

311 DATA 24,0,168,136,168,136,136,168, 

8,25,0, 168 ,136,168,8,8,8,8 

315 DATA 34,0,168,136,160,136,136,168, 
8,35,0,168,136,128,128,136,168,0,37,8, 
168,128,168,128,128,168,8 

316 DATA 38,8,168,128,168,128,128,128, 
0,40,0,136,136,168,136,136,136,0 

320 DATA 41,0,168,32,32,32,32.168,8,44 
,0,128,128,128,128,128,168,0,47,0,168, 
136,136,136,136,168,8 

321 DATA 50,0,168,136,136,168,168,136, 
8,51,8,168,128,168,8,8,168,8 

325 DATA 53,0,136,136,136,136,136,168, 
8,96,202,242,252,223,253,127,247,255,9 
7,178,170,8,255,255,119,253,223 

326 DATA 98,163,143,63,253,127,247,223 
,225,99,255,253,223,255,127,247,223,25 

330 DATA 100,192,192,204,252,228,255,1 
27 , 247 , 101 , 240 , 248 , 252 , 252 , 220 , 255, 119 
,255,182,0,3,15,13,15,63,55,255 

331 DATA 103,8,3,3,51,63,55,255,223,18 
4 , 247 , 127 , 228 , 252 , 284 , 192 , 192 , 192 

335 DATA 185,223,255,61,55,63,13,15,3, 
106,8,8,0,0,12,60,247,223,107,8,8,8,0, 
48,68,255,215,108,255,115,248,192,8,8 

336 DATA 0,0,109,223,243,48,48,0,0,0,0 

340 DATA 13,0,8,0,168,8,8,8,8,113,2,2, 
18,18,42,42,48,40,114,130,130,130,138, 
178,8,0,0,115,128,128,160,160,168,168 

341 DATA 40,40,110,0,195,68,68,68,68,1 
95,8 

345 DATA 116,255,255,195,195,195,195,1 
95,195,117,8,0,0,0,8,60,255,255,118,0, 
0,85,1,4,16,64,85,119,8,0,85,64,16,4,1 

346 DATA 85,111,85,85,85,93,93,85,85,8 

358 DATA 120,202,114,252,255,255,255,8 

5,255,121,178,178,8,255,255,255,85,255 

,122,163,141,63,255,255,255,85,255 

351 DATA 112,8,252,252,252,8,287,287,2 

87 

355 DATA 1,255,85,255,255,255,255,85,2 

55,46,0,136,168,168,168,168,136,8,48,0 

,168,136,136,168,128,128,8,-1 

360 GRAPHICS C0:P0KE 710, C128 :P0KE 712 

, C128 : DL^PEEK 15683 *256«PEEK C561 J : POKE 

82, C8: POKE 752, Cl;? !POKE PLX.CO 

365 ? " > 

~\':? ■■ /i 



370 ? 
1_V:? " 

375 ? •■ 
k V:? 

388 ? •■ 

I Mi 



. HI IHT I ^1 111 



385 ? " I 



398 ? ■■ 
395 ? 



1^ 



":? •■ COopyright 1984 by Hicha 
el J. Coulson" 

48 POSITION C20 -C14tLENCHS$>i/C2.2l!? 
- I" ;H5S; POSITION C5. 15 : ' 



HIGH SCORE - 

Please Wait - Initialiiiri' 



485 GOSUB 230:G0SUB 288 
418 POSITION C5,15:? " 



I 



— "': POSITION 14,C16:? -1 

CBi";CHRStSC*1761; "BI" 

415 POSITION ii« t-fo "l"' , i...pn 

SITION 14,18:? "lltO ilHtlB" ; OHRJ tl /5*G P 

}; "In": POSITION tit ftfiy ^ iTT-rnntfTf n .. 

428 C=PEEK CCNSLl : GP=GP+ CC=C5) : SC=SC+ CC 

=C31:IF GP>C5 THEN GP=C2 

425 IF SC>C8 THEN 5C=C1 

438 IF COC6 AND STRIGCCS) THEN 410 

435 POKE 559,Ce:P0KE 82,C8:P0KE 756, CH 

SET/256 : POKE 712 , CO : SCREEN=458+SC«58 

448 POKE 752, Cl: POKE DL+C3,68:F0R I=C6 

TO 28: POKE DL+I,C4:NEKT I: RETURN 

450 G RAPHICS 17: POKE 82,C8; P0KE 87, Ce: 
t 11 i"ji"*'i"i"*"«"ji"ji"i"i"i"i'4i"4i"j,i , « ,, ij,mj. F Vj i n ir %j 

rt' lt W ' f ...■.■.-.■.■...■.-.-----. 

468 ? " VOU HAUE COMPLETED":? " VOUR M 
ISSION, AND ":? " HAVE BEEN ASSIGNED": 
? " A NE W ONE." 
465 ?. " b MiPiillMj i:";? :? " bonus 

r^ «4*" : SC=5C*18e8e : FUEL=588 
478 FOR I=C1 TO 400: NEXT I: GRAPHICS CO 
: GOSUB 230: GOSUB 280: GOSUB 435:GP=GP+C 
1 : GP=GP- (GP>C5) : SCREEN=500 : GOTO 25 
580 CLl=244:CL2=248:FX=ll:FY=16 
582 ? " jH^ g" 
584 ? " gce^ fdj> gc" 
506 ? "gkj kgcccekjkjfe jjfcccejk 

kgcc" 
588 ? "ccccccccccccccccccccccccccce 

fcccc" 
518 ? "ccccccccccccccccccccccccccce 

ccccc" 

512 ? "CCCCCCCClnlHHliCCCCCCCMihMli 

ccccc" 

514 ? "CCCCChMl icccccl 

ccccc" 
516 ? "CCCCh iccch 

fccccc" 

518 ? "CCCh fCCh 

gcccccc" 
520 ? "ccce f^aaabccch fee 
icccccc" 

522 ? "CCCC il|ailHi4MM iCh 

iccccc" 

524 ? "CCCC 

ccccc" 

526 ? "CCCCd^^^^ fCCCCC" 

528 ? "cccccdl^^^^ fcccccc" 

538 ? "cccccccd gej 

fccccccc" 

532 ? "ccccccccccej jgejk jjfdj jgccce jf 

cccccccc" 

534 ? "ccccccccccccccccccccccccccccccc 

CCCCCCCC":RETURN 

558 CLl=14:CL2rl98:FX=31:FY=20 

552 ? ">► j" 

554 ? "►► fee" 

556 ? "►► gccce" 

558 ? "►► jfCCCCCd" 

568 ? "►► gccccccccdjkk" 

562 ? "e jkkgj jfccccccccccccce 

jkgkgkjj" 

564 ? "cd fccccccccccccccccccccc 

cccccccc" 
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ANALOG COMPUTING 



ccccccccccccchlli«*licc 

fccccccccccchl ic 

ccccccccccch i 

iCCCCCCCChM 

icccccch f 

iCCCCh fC 

iMhH 9c«aabcc 



icccchllnlMicccc" 

MllM iCCC" 
ice" 
j cc" 
j fcej 



566 ? "CCd 

cccccccc" 

568 ? "CCC 

cccccccc" 

570 ? "CCh 

cccccccc" 

572 ? "cc 

cccccccc" 

574 ? "cce 

cccccccc" 

576 ? "CCC 

cccccccc" 

578 ? "CCC 

cccccccc" 

580 ? "CCh^^ 

582 ? "cceH> 

584 ? "CCCdl^^^ 

586 ? "CCCCd>^> 

588 ? "cccccejk 

S gcc" 

590 ? "CCCCCCCC jkkfcdjfdjgejkjkkjgcccc 

dkjkgccc" 

552 ? "ccccccccccccccccccccccccccccccc 

cccccccc":RETURN 

680 CL1=202SCL2=134:FH=11:FY=14 

602 ? "^> k" 

604 ? "►► fed" 

606 ? "►► fccce" 

608 ? "it gcccccd ge" 

610 ? "e jkdke fcejgcccccccdfejkg 

kgccek"^ _^ 

612 ? "B tiBBBI h fSccccccccccccccccc 

ccccccek" 

614 ? "is BPn h flilSccccccHl iHMiCCCC 

cccccccc" 

616 ? "B HBh f fililil CCCCCh CCCC 

cccccccc" _ ___^, 

618 ? "0 HE q fiUnil cCCCh fCCCC 

cccccccc" „ 

620 ? "B [iE} ii Beech j Bccce 

cccccccc" _ „ _ 

622 ? "B liE Bccc fB Bcccc 

cccccccc"!? "B GB B Bcch fcB 

fflccccccccc ccc" _ _ 
624 ? "B tJ' H'lJil'HPBl ch gccB Bcccc 

cccccccc":? "B iccchM fcccB 

flir rcrrrcrrcrc" 

ich fccccB iCCC 

H gcccccB Hli 

gcccccce 

gccccccccekk 



626 ? "B 

cccccccc" 

628 ? "cekgk 

cccccccc" 

630 ? "ccccce 

cccccccc" 

632 ? "cccccce 

cccccccc" 

634 ? "cccccccdjjgjkggcccccccccccc#aab 

cccccccc" 

636 ? "ccccccccccccccccccccccccccccccc 

cccccccc":RETURM 

650 CL1=244:CL2=124:FK=26:FY=12 

652 ? "oooooooooooooooooo oooooooo 

oooooooo" 

654 ? "CCCCCCCCCCCCCCCCCO OCClHlCC 

cccccccc" 

656 ? "CCCCCCCCCCChlHMiCO och ll 

cccccccc" 

658 ? "CCChNihllim CO Oh 

iMMhlH C" 

660 ? "CCh CO O k 

662 ? "Ch jkgk fCO Od B CO 
C" 

664 ? "c fcccccc*abcco ocekgcce 

jg jgc" 

666 ? "c ccooooooooooo oooooooo 

oo ooo" 

668 ? "ce icooooooooooo oooooooo 

oo ooo" 



ANALOG COMPUTING 



670 ? "cce ioDooooooooo oooooooo 

oo ooo" 

672 FOR 1=1 TO 3:? "oooM^^ ooo":H 

EXT I 

674 FOR 1=1 TO 3:? "OOOOOOOOOOOOOOOOOO 

ooooooooooooooooooooo" : NEXT I : RETURN 

700 CL1=244:CL2=248:FX=23:FV=21 



•| ► ► ► 90 

"►►►fccB 



782 ? 

784 ? 

706 ? 

708 ? "►►HOcccc 

710 ? " k^^ 



e" 

Cd" 

cce" 
_ Bccccd" 
gcccccB Bccccck" 



fe 



kfccccccB 



712 ? " gcd 

cccccce" _ 

714 ? "fcccdkgkkgccdkgjkfccccccccB 

cccccccd 

716 ? "PPPPPPPPPPPPPi 

HgcccccC 



00000000000000 



B 
B 
B 



718 ? "pppppppp^^ ccce 
720 ? "ppppppp> k 

c" ___ 

722 ? "pppppp pppBBB 

Bcccccc" 

724 ? "ppppp PPPPBh 

Bcccccc" 

726 ? "PPPP PPPPPB 

Bcccccc" 
728 ? "ppp PPPPPPB 



iBcccccc" 
iccce Bccccc 



PPPPPPBd 



fee 
fecce 
cecce 
icech 

IHH 



iccce 

ilMM 



729 ? "PI 

Bcccccc' 

730 ? "PPP 

Bcccccc" 
732 ? "ccc^aabccccccBce 

Bcccccc" 
734 ? "cccccccccccccl^cd 

Bcccccc" 

736 ? "cccccccccccccBccc jgk 
fBcccccc" 

738 ? "cccccccccccccf^ccccc 
cBcccccC 

74 ? "ccccccccccccc 
EEcccccc":RETURN 
750 CL1=58:CL2=68:FX=26:FY=16 
752 ? "►► fdkjgepppppppppppp" 
754 ? "►► fccccccp pp" 
? "M 



gk 
cc 

IH 

B 



kjkg 

iCCC 
MiH 



fek 
fccc 



oooooooooooooooooo 



756 



gcccccccp 



PP" 



758 ? "►► fccccccccp _ _PP 

? "►► 



760 ? "►> fccccccccccfaabpB Bpp" 
762 ? "kgk jkgB 
cpB Bpp" 



764 ? "cccccccB 

BpB Bpp" 

766 ? "cccccccB 

ppB Bpp" 

768 ? "cccccccB 

ppB Bpp" _ 

778 ? "cccccccB 

ppB Bpp" 

772 ? "cccccccB 

ppB Bpp" 

774 ? "cccccccB 

PP0 Bpp" 

776 ? "cccccccB 

BpB Bpp" 

778 ? "cccccccB 

BpS Bpp" 

788 ? "cccccccB 

BpB Bpp" 

782 ? "cccccccB 

BpB Bpp" 

784 ? "cccccccB u 

ppB Bpp" „ ^ 

786 ? "cccccccB t 

BtiBl BBp' 

788 

790 



Bjkgkfcccccccccccccc 
BccccccccccctiUililiUiU 



MJ.IiHJ'II ppppPH 

msEm 



BpBBBB \sLaas 

BppppBBSiniEiapBB 
BpppppppppppppB 

t.t.t.l.l.!.M.!.|.l pPPPBra 

BppppEiEIiliCE! 
Bpppppppppp 
[jH'M-m-M-M 



88 ? "cccccccra t MliMiMilj M HP" 

90 ? "cccccccB t Wppppp# > W" 

32 ? "fccccccraqtsBpppppui'iii'Hia'ig'i'i'i'i'i'i 



SEBBp" 
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Soft v\#cir^ 
Sale 

Programmers Reference Guide 
iV tV $12.95 ir -iz 



ATARI 

Call (312) 382-5050 To Order 



Sup^r 

S of f- wd r^ 

Sale 

All Software Is On Disk Unless 
Stated Otherwise. 



GAMES 



$19.95 $14.95 



ATARI LIST SALE 

A567 STAR VOYAGER $19.95 $14.95 

A544 STAR RAIDERS $19.95 $14.95 

A545 MISSILE COMMAND (CART.) $19.95 $14.95 

A546GALAXIAN{CART.) $19.95 $14.95 

A547 DEFENDER (CART.) $19.95 $14.95 

A548 DIG DUG (CART.) $24.95 $16.95 

A549 DONKEY KONG (CART.) $24.95 $16.95 

A550ROBOTRON(CART.) $24.95 $16.95 

A571 POLE POSITION (CART.) $24.95 $16.95 

A570 DONKEY KONG JR. (CART.) $24.95 $16.95 

A569MS.PAC MAN (CART.) $24.95 $16.95 

A595 JOUST (CART.) $24.95 $16.95 

A555PENGO(CART.) $24.95 $16.95 

A556 MILLIPEDE (CART.) $24.95 $16.95 

A557 JUNGLE HUNT (CART.) $24.95 $16.95 

A558 MARIO BROS. (CART.) $24.95 $16.95 

A559 MOON PATROL (CART.) $24.95 $16.95 

A560 FINAL LEGACY (CART.) $24.95 $16.95 

A561 FOOTBALL (CART.) $19.95 $14.95 

A562 TENNIS (CART.) $19.95 $14.95 

A563 TRACKS FIELD (CART.) $39.95 $29.95 

A564 EASTERN FRONT (CART.) $19.95 $14.95 
A565 GALAHAD & THE HOLY GRAIL 

$19.95 $14.95 

A566 ADVENTURE WRITER $24.95 $19.95 

A568SARGONII $29.95 $16.95 

FIRST STAR 

A510SPY VS.SPY $29.95 $20.95 

A511 I LOVE MY ALPHABET $29.95 $24.95 

A5I2 U.S. ADVENTURE $29.95 $24.95 

■MAGIC 

A513CHOPPERHUNT 

BRODERBUND 

A514MASKOFTHE SUN 

A51 5 OPERATION WHIRLWIND 

A516SPELUNKER 

A517 LODE RUNNER 

A518 WHISTLERS BROTHERS 

A501 SERPENT'S STAR 

A502 STEALTH 

EPYX 

A519 TEMPLE OF APSHAI 

A520 JUMPMAN 

A521 DRAGON RIDERS OF PERN 

A522 SUMMER OLYMPIC GAMES 

A523PITSTOPII 

A524 BALL BLAZER 

A525 RESCUE ON FRACTULUS 

SSI 

A526 KNIGHTS OF THE DESERT 

A527 FIELD OF FIRE 

A528 FORTRESS 

A529 THE COSMIC BALANCE 

A530 IMPERIUM GALACTUM 

A531 RAILS WEST 

A532 TIGERS IN THE SNOW 

A533 50 MISSION CRUSH 

A590 BROADSIDES 

A591 COMPUTER QUARTERBACK 

A592 COMPUTER AMBUSH 

A593 COMPUTER BASEBALL 

A594QUESTRON 

MUSE 

A583 CASTLE WOLFENSTEIN $39.95 

A584 BEYOND CASTLE WOLFENSTEIN 

$39.95 

MICROPROSE 

A581 SOLO FLIGHT 
A582 HELLCAT ACE 



$39.95 
$39.95 
$22.95 
$34.95 
$29.95 
$39.95 
$29.95 



$39.95 
$39.95 
$39.95 
$39.95 
$39.95 
$39.95 
$39.95 

$39.95 
$39.95 
$34.95 
$39.95 
$39.95 
$39.95 
$39.95 
$39.95 
$39.95 
$39.95 
$59.95 
$39.95 
$49.95 



$37.95 
$29.95 

SYNAPSE 

A534 ENCOUNTER $19.95 

A535 BLUE MAX 2001 $29.95 

A536 QUASIMODO/AIR SUPPORT $34.95 
A537N.Y.C. /ELECTRICIAN $34.95 

A538 RAINBOW WALKER/COUNTDOWN 

$24.95 
A539 FORT APOCALYPSE $34.95 

A540 BLUE MAX $34.95 



$24.95 
$24.95 
$18.95 
$20.95 
$18.95 
$24.95 
$18.95 



$24.95 
$24.95 
$24.95 
$24.95 
$24.95 
$24.95 
$24.95 

$24.95 
$24.95 
$22.95 
$24.95 
$24.95 
$24.95 
$24.95 
$24.95 
$24.95 
$24.95 
$34.95 
$24.95 
$27.95 



$18.95 
$22.95 

$22.95 
$18.95 

$14.95 
$19.95 
$19.95 
$19.95 

$19.95 
$20.95 
$20.95 



Add S3 00 tor shipping handling ond insuionce lllinoi!. residenK 
pleasf odd 6°. ton Add S6 00 lot CANADA PUERTO RICO HAWAII 
ALASKA APO FPO orders Canodian orders musi be in U S dollors 
WE DO NOr EXPORT TO OIHER COUNTRIES EXCEPT CANADA 
Enclose Cashiers Check Money Order or Personal Check Allow 14 
doys for delivery 2 lo 7 days lor phone orders I day express moil 
VISA MASTER CARD COD 

NoCOD !o Canada APO-FPO 



LIST 


SALE 


$39.95 


$20.95 


$28.00 


$19.95 


$25.00 


$16.95 


$31.00 


$22.95 


$21.00 


$12.95 


$21.00 


$18.95 


$30.00 


$24.95 


$40.00 


$26.95 


$21.00 


$14.95 


$30.00 


$21.95 


$25.00 


$16.95 


$23.00 


$16.95 



ACCESS 

A589 BEACHHEAD 

AVALON HILL 

A572TELENGARD 

A573T.G.I.F. 

A574 FLYING ACE 

A575 MIDWAY CAMPAIGN 

A576 B-I NUCLEAR BOMBER 

A577LEGIONAIRE 

A578T.A.C. 

A579 MARKET FORCES 

A580 PANZER JAGD 

A504 GALAXY 

A505 ANDROMEDA CONQUEST 

A506 COMPUTER STOCKS AND BONDS 

$25.00 

COSMI 

A507 FORBIDDEN FORREST (TAPE/DISK) 

$16.95 

A508 AZTEC CHALLENGE (TAPE/DISK) 

$16.95 

A509 CAVERNS OF KHAFKA (TAPE/DISK) 

$16.95 

DATASOFT 

A585 BRUCE LEE 
A586 PAC MAN 
A587 CONAN 
A588MR. DO 



$39.95 
$29.95 
$39.95 
$29.95 



$18.95 

$12.95 
$12.95 
$12.95 

$20.95 
$18.95 
$22.95 
$24.95 



ACCESSORIES & 
PROGRAMMING AIDS 

A096 SURGE PROTECTOR 6 PLUG $49.95 $29.95 

A007 DATA CASSETTE RECORDER $91.00 $44.95 

A093 MONITOR CABLE $14.95 $ 9.95 

A015 BOX/10 ECONOMY DISKS $29.95 $12.95 

A018 BOX/10 FUJI FLOPPY DISKS $39.95 $14.95 

A025 50 FLOPPY DISK FILE BOX $39.95 $14.95 

A022 FLOPPY DISK CLEANER $29.95 $19.95 

A442 ATARI GRAPHICS TABLET $99.00 $49.95 

A105 BASIC TUTORIAL (BOOK) $16.95 $12.95 
A106 ADVANCED BASIC TUTORIAL (BOOK) 

$16.95 $9.95 
A1C7 PROGRAMMERS REFERENCE GUIDE (BOOK) 

$24.95 $12.95 



BUSINESS 



ATARI 

A201 ATARI WRITER (CART.) $49.95 

A202 PROOFREADER $19.95 

A203VISICALC $39 95 

A204 HOME FILE MANAGER $24.95 

A215 TIME WISE $19.95 

CODEWRITER 

A206 FILE WRITER $29.95 

A207 REPORT WRITER $29.95 

A208 MENU WRITER $29.95 

A209 FAMILY FINANCE $29.95 

A210 HOME INTEGRATOR $24.95 
A21 1 SMALL BUSINESS INVENTORY $19.95 

A212 SALESMAN'S EXPENSE $19.95 
A21 3 ACCOUNTS RECEIVABLE & PAYABLE 

$19.95 

A21 4 RETAIL INVOICE $19.95 

PEACHTREE 

A21 6 GENERAL LEDGER $99.00 

A217 ACCOUNTS RECEIVABLE $99.00 

A21 8 ACCOUNTS PAYABLE $99.00 



$39.95 
$16.95 
$29.95 
$19.95 
$14.95 

$24.95 
$24.95 
$24.95 
$19.95 
$19.95 
$12.95 
$12.95 

$12.95 
$12.95 

$49.00 
$49.00 
$49.00 



EDUCATION 

FISHER PRICE 

A444 LINKING LOGIC (CART.) $24.95 $16 95 

A445 DANCE FANTASY (CART.) $24.95 $16.95 

A446 MEMORY MANOR (CART.) $24.95 $16 95 

A447 LOGIC LEVELS (CART.) $24.95 $16.95 

SCHOLASTIC 

A407 BANNER CATCH $29.95 $22.95 

A408 SQUARE PAIRS $29.95 $22 95 

A409SPELLAKAZAM $39.95 $24 95 

A410 SPELL DIVER $29.95 $22 95 

A411 AGENT U.S.A. $29 95 $22 95 



ATARI LIST SALE 

A31 6 LOGO (CART.) $49.95 $39.95 

A31 8 ASSEMBLER/EDITOR (CART.) $29.95 $19.95 

A31 5 PILOT (CART.) $39.95 $29.95 

A319 MACRO ASSEMBLER (CART.) $29.95 $19.95 

A420 ATARI MUSIC I $29.95 $19.95 

A421 ATARI MUSIC II $29.95 $19.95 

A422 INTRO TO BASIC I (TAPE) $19.95 $14.95 

A423 INTRO TO BASIC II (TAPE) $19.95 $14.95 

A424 INTRO TO BASIC III (TAPE) $19.95 $14.95 

A433 TYPE ATTACK (CART.) $19.95 $16.95 

A436 SAT SAMPLE TESTS $34.95 $17.95 

A437 SAT MATH MODULE $39.95 $29.95 

A435 SAT VERBAL MODULE $39.95 $29.95 

A434 THE LEARNING PHONE (CART.) 

$24.95 $19.95 

A438 TOUCH TYPING (TAPE) $19.95 $14.95 

A439 JUGGLES RAINBOW $19.95 $16.95 

A440 JUGGLES HOUSE $19.95 $16.95 

A443 PAINT $24.95 $19.95 

A425 ATARI LAB STARTER SET (CART.) 

$69.95 $49.95 
A426 ATARI LAB LIGHT MODULE (CART.) 

$49.95 $39.95 

A427 SCRAM $24.95 $19.95 

A428 SKYWRITER (CART.) $19.95 $16.95 

A429 CONVERSATIONAL FRENCH (TAPE) 

$19.95 $16.95 
A430 CONVERSATIONAL SPANISH (TAPE) 

$19.95 $16.95 

A431 MY FIRST ALPHABET $19.95 $16.95 

A432 SPEED READING (TAPE) $24.95 $19.95 

DESIGNWARE 

A401 CRYPTO CUBE $39.95 $24.95 

A402SPELLAGRAPH $39.95 $24.95 

A403 MATH MAZE $39.95 $24.95 

A404 SPELLICOPTER $39.95 $24.95 

A405 CREATURE CREATOR $39.95 $18.95 

A406TRAP-A-ZOID $39.95 $24.95 

WEEKLY READER 

A412STICKYBEARBOP $39.95 $24.95 

A413STICKYBEAR NUMBERS $39.95 $24.95 

A414STICKYBEARBASKET80UNCE $39.95 $24.95 

A4I5STICKYBEAROPPOSITES $39.95 $24.95 

A416STICKYBEARABC $39.95 $24.95 

A417STICKYBEAR SHAPES $39.95 $24.95 

AMERICAN EDUCATIONAL COMPUTER 

A418 BIOLOGY FACTS $24.95 $16 

A419 ELEMENTARY SCIENCE FACTS $24.95 
A459 VOCABULARY WORD BUILDER 

$24.95 
A460 GRAMMAR WORD USE SKILLS $24.95 
A461 WORD GEOGRAPHY FACTS $24.95 
A462 SPANISH VOCABULARY SKILLS 

$24.95 
A463 FRENCH VOCABULARY SKILLS $24.95 



$16. 

$16. 
$16, 
$16. 



$16 

$16 
$16 
$16 
$16 
$16 
$34 

$16 

$16 



A464 WORLD HISTORY FACTS $24.95 

A465 U.S. HISTORY FACTS $24.95 

A466 U.S. GEOGRAPHY FACTS $24.95 

A467 U.S. GOVERNMENT FACTS $24.95 
A468AEC SPELLING 2-8 $99.95 

A480 READING COMPREHENSION SKILLS 

$24.95 
A485 WORDS IN READING VOCABULARY 

$24.95 

SPINNAKER 

A448KINDERCOMP $20.95 $16.9! 

A449 PACEMAKER $20.95 $16.9.' 

A450 KIDS ON KEYS $20.95 $16.9; 

A451 GRANDMA'S HOUSE $20.95 $16.9; 

A452 KIDWRITER $26.95 $22 9; 

A453 FRACTION FEVER (CART.) $24.95 $18.9; 
A454 IN SEARCH OF THE MOST AMAZING THING 

$26.95 $22.9; 

A455 TRAINS $26.95 $22.9; 

A456 ALPHABET ZOO $20.95 $16.9; 

A457 AEROBICS $34.95 $24.9; 

A458 MATH BUSTERS $26.95 $22.9; 

COMPUTER DIRECT 

We Love Our Customcrf: 
Box 1001, Barrington, III. 60010 

312/382-5050 to order 

CIRCLE #123 ON READER SERVICE CARD 



Ml Lowest Price In The USA! 

atar! Computer System Sale 

• Students • Word Processing • Home • Business 




$449 

LOOK AT ALL YOU GET FOR ONLY ^ m M ^W 

SYSTEM PRICE 

©Atari 800XL 64K Computer 
©Atari 1050 127K Disk Drive 
©Atari 1027 Letter Quality 20 CPS Printer 

Atari Writer Word Processer 

Atari BASIC Tutorial Manual 



LIST PRICE 

$179.00 

299.00 

299.00 

59.95 

16.95 



INDIVIDUAL 
SALE PRICE 

$109°° 
13900 

199°° 
39'=' 
12" 



SAVE $100 

All 5 ONLY 
$44900 

SYSTEM 
SALE PRICE 



All connecting cables & T.V. interface included. 
Monitors sold seporetly. 



TOTALS 



$852.90 $549.90 



INAONITOR OPTIONS: List Sale 

/V 12" Hi Resolution Green or Amber Screen $199.00 99.00 

^ 13" Hi Resolution Color $399.00 195.00 



Add S9.95 tor 

Connection Cables 

and SlOfor UPS 



15 DAY FREE TRIAL. We give you 15 days to try out this ATARI COMPUTER SYSTEM! I If it doesn't meet your expectations, just send it 
back to us prepaid and we will refund your purcfiase price! ! 

90 DAY IMMEDIATE REPLACEMENT WARRANTY. If any of the ATARI COMPUTER SYSTEM equipment or programs fail due to faulty 
workmanship or material within 90 days of purchase we will replace it IMMEDIATELY with no service charge ! ! 



Best Prices * Over 1000 Programs and 500 Accessories Available * Best Service 
• One Day Express Mail * Programming Knowledge * Technical Support 



Add $25.00 for shipping and handling!! 

Enclose Cashiers Check, Money Order or Personal Check. 
Allow 14 days for delivery. 2 to 7 days for phone orders. 1 day 
express moil! We accept Visa and MasterCard. We ship 
C.O.D. to continental U.S. addresses only. 



COMPUTER DIRECT 

We Love Our Customers 
Box 1001, Barrington, 111. 60010 

312/382-5050 to order 



FANTASTIC PRINTER 
^24'' SALE!! ^24'' 

Commadare 64 — VIC 20 — A tari 

^ 40 And 80 Column Printers ^ Up To 100 Characters Per Second iV Full Graphics Capability 
ii Upper And Lower Case i^ Advanced Thermal Technology For Quiet Operation 




3100 Alphacom 42-80 CPS 40 Column Printer 

Print out listings with full computer character 
sets (interface required, see below). Print in 
upper and lower case. Comes with a roll of 
paper and all power adapters needed. Perfect 
for a spare printer or program lister. List $99.00. 
Sale $24.95. 

40 Column Extra Paper LIST SALE 

3103 25 Meter Rolls Blue $9.95 $3.00 

3104 40 Meter Rolls Blue $16.95 53.95 

3105 25 Meter Rolls Black (1 per pkg.) $12.95 $3.95 

3106 25 Meter Rolls Blue (2 per pkg.) $19.95 $5.95 

3107 25 Meter Rolls Black (2 per pkg.) S19.95 $5.95 



3150 Alphacom 81-100 CPS 80 Column Printer 

Now you can have a printer for the cost of a 
large box of paper. This printer prints in upper 
and lower case with true lower descenders. 
Comes with ^ roll of paper and power adapter. 
With the intelligent interfaces (sold below) you 
can do Ascii graphics as well as Atari or 
Commodore graphics. Plus you can do 
underlining and expanded modes. Print out 
pictures, program listings, word processing 
pages, etc. Perfect for the student or 
homeowner. List $199.00. Sale $39.95. 

80 Column Extra Paper LIST SALE 

3153 40 Meter Rolls Blue $14.95 $3.95 

3)54 40 Meter Rolls Black $19.95 $4.95 

3155 25 Meter Rolls Blue (2 per pkg.) $19.95 $7.95 

3156 25 Meter Rolls Black (2 per pkg.) $19.95 $8.95 



3101 Intelligent Commodore Interface — Allows you to 
hook the 40 or 80 column printer to the Commodore 64, do 
program listings, allows software screen dumps, etc. 
Includes Commodore graphics and reverse characters. 
(Specify 40 or 80 Column) List $59.95. 
40 Column Sole $9.95. 80 Column Sole $14.95. 




Add SIO.OO for shipping, handling and insurance. Illinois residents 
please add 6% tax. Add S20.00 for CANADA, PUERTO RICO, HAWAII, 
ALASKA, APO-FPO orders. Canadian orders must be in U.S. dollars. 
WE DO NOT EXPORT TO OTHER COUNTRIES EXCEPT CANADA. 
Enclose Cashiers Check, Money Order or Personal Check. Allow 14 
days for delivery, 2 to 7 days for phone orders, 1 day express moil ! 
VISA — MASTER CARD — C.O.D. No C.O.D. to Canada, APO-FPO 



3102 Intelligent Atari Interface — Allows you to hook 
the 40 or 80 column printer to the Atari computer, do 
program listings, allows software screen dumps, etc. 
Includes Atari graphics and reverse characters. (Specify 40 
or 80 Column) List $59.95. 
40 Column Sale $9.95. 80 Column Sale $14.95. 

COMPUTER DIRECT 

We Love Our Customers 
Box 1001, Bcrrington, III. 60010 

312/382-5050 to order 

CIRCLE #123 ON READER SERVICE CARD 



FANTASTIC COMPUTER PRINTER SALE!!! 



10X COM-STAR 



Tractor Friction Printer 



-^ I ^i 



130-150 CPS 



Only 



Com-Star 



Hitniii 



Bi 



COMSTAR 



List $499 



• Lowest Sale Price, Premium Quality, Tractor/Friction Printer in the U.S.A. (Best Value) 

• Highspeed 130-150 Characters Per Second • 40, 46, 66, 80, 96, 132 line spacing 

• Word Processing, Letters • Business Forms • Labels, Graphics, Tables • List Programs 
Fantastic Graphics • Print Modem Data • The Most Important Accessory For Your Computer 



Premium Quality 

130-150 CPS lOX COMSTAR 

Printer $199 

10" carriage, prints 8i/^"xll" standard 
single sheet or continuous feed paper, 
Bi-directional, impact, dot matrix, ISO- 
ISO CPS, 9 X 9 dot matrix with double 
strike capability for 18 x 18 dot matrix 
(near letter quality), high resolution bit 
image, underlining, back spacing, true 
lower descenders with super and 
subscripts, prints standard, italic, block 
graphics, and special characters. It 
gives you print quality and features 
found on printers costing twice as 
much!! (Centronics Parallel Interface) 
(Better than Epson FX80). List $499.00. 
Sale $199.00. 

Premium Quality 150-170 CPS 

15I/2X COM STAR Business 

Printer $319.00 

Has all the features of the lOX COM- 
STAR PRINTER plus 15%" carriage and 
more powerful electronics components to 
handle large ledger business forms! 
(Better than Epson FX 100). List $599. 
Sale $319.00. 



■JUKI 

12" DAISY WHEEL 
PRIIVTER $199.00 

"JUKI" Superb letter quality daisy 
wheel printer, 12" extra large carriage, 
up to 12CPS bi-directional printing, 
drop-in cassette ribbon, (90 day 
warranty) Centronics parallel or RS232 
serial port built in! (Specify). 
List $299.00. Sale $199.00. 



UUKI* 

Printer/Typewriter 
Combination $279.00 

"JUKI" Superb letter quality, daisy 
wheel printer/typewriter combination. 
Two machines in one — just a flick of the 
switch. 12" extra large carriage, 
typewriter keyboard, automatic margin 
control and relocate key drop in cassette 
ribbon 1 (90 day warranty) Centronics 
parallel or RS232 serial port built in 
(Specify). List $399.00. Sale $279.00 



OOlympia 



Executive Letter Quality $339.00 
15" Daisy Wheel Printer 

This is the world's finest daisy wheel 
printer. Fantastic letter quality, up to 20 
CPS bi-directional, will handle 14.4" 
forms width! Has a 256 character print 
buffer, special print enhancements, built 
in tractor-feed (Centronics Parallel and 
RS232C Interface) (90 day warranty). 
List $649.00. Sale $339.00 



OOlympia 



Printer/Typewriter Combination $439.00 

Better than IBM Selectric. Superb 
computer printer combined with the 
world's finest electronic typewriter. Two 
machines in one, just flick the switch for 
up to 20 CPS printing (300 Words per 
minute) on a 15" carriage that handles 
up to 14 1/8" in. paper. Drop in cassette 
ribbon — express lift off correction, 
Centronics parallel interface (90 day 
warranty). List $749.00. Sale $439.00. 



• 15 Day Free Trial — 7 Year Immediate Replacement Warranty 



PARALLEL INTERFACES 

For VIC-20 and COM-64 — $59.00. Apple — $79.00. Atari — $59.00. 



Add S14.50 for shipping, handling and insurance. Illinois residents 
please odd 6% fax. Add $29.00 for CANADA, PUERTO RICO. HAWAII, 
ALASKA. APO-FPO orders. Canadian orders must be in U.S. dollars. 
WE DO NOT EXPORT TO OTHER COUNTRIES, EXCEPT CANADA. 
Enclose Cashiers Check, Money Order or Personal Check. Allow 14 
days delivery. 2 to 7 days for phone orders. I day express mail ! 
VISA — MASTERCARD ~ C.O.D. NoC.O.D. to Canada or APO-FPO 



COMPUTER DIRECT 

We Love Our Customers 
Box 1001, Barrington, III. 60010 

312/382-5050 to order 



COM>-STAR PLUS+ 
Print Example: 



AKDEFGHIJKLMNOPORSTUVMXYZ IZS^^S^ 



UVMXV 



^^ 



Lunar Patrol 

continued from page 45 



9C 
cc 

Ch 



fcH 

jfcH 
cccQ 
iccQ 

ct3 

I cQ 



!V 

vwvwvwvc cc 

HVIWHC CC 

Hwv vwvwc cc 

Qppvw vwc Hi 



794 ? "cccccccraraHiBppppppppppppppppppp 

pppppppp"; : RETURN 

888 CLl=68:CL2=182:FK=2l!FV=14 

882 ? ■■vwwvwvwvwvluuuivwvwvifvmw! 

wvwvwvwv" 

884 ? "cccccch 

cccccccc" 

886 ? "ccccch 

cccccccc" 

888 ? "cccch 

cccccccc" 

818 ? "CChl 

cccccccc" 

812 ? "cc 

iccccccc" 

814 ? "cc 

ccccccc" 
816 ? "cc 

ccccccc" 
818 ? "CC 

ccccccc" 
828 ? "cc 
gccccccc" 
822 ? "cc 
cccccccc" 
824 ? "CC fd 
iccccccc" 
826 ? "cc cc 

ccccccc" 
828 ? "cc IM 

iwvwvwc" 
838 ? "cc 
832 ? "cc 
834 ? "cce 

fee c" 
836 ? "ccce 

fcccd fc" 

838 ? "ccccfaabcccHHBBHccccccccccccccc 

cccccccc"; :RETURM 

858 CL1=46:CL2=56:FH=26:FV=18 



Bppppv 
Hpppppvw 
Qpvwvwvw 
Bv V 
Hv (Bm 
wvwv 
vpppv 
vpppw 
j cB u B vwvwv 

fed era t m^ 
cch era t m¥ 
IM cB t B J 



ce 

ced 

cccd 

ccch 

cch 

cc 

cce 

ccce 

vwv! 



c' 
c' 



fcBqrsB j feed gdjjk 



852 ? "►► 
854 ? "M 
856 ? "►► 
858 ? ••>> 
"M 



PPPPPPPPPPPPPPPPPg ' 
• h IM 11 icQ' 
" jk kk kj iB" 
,-11 ecccccccccc 

3 B B Bch 



868 ? . _ _ 

862 ? "vwuvwuwvuvwuwvuvw B 
k gcB' 

u 



864 ? "! ! U 

ceccccB" 
866 ? "T! t 

iHHicB" 
868 ? "M t 



IB" 
"T! t 



Bh 

u u u ! B Bw B 
t t t t ! Bw B Be 
t t t t ! B '"Bee 

t t t t ! B cce 

1 



878 ? 

ccce B' 

872 ? "j_!qrsqrsqrsqrsqrs! ! ! ! ! !ecw 

M 

ieceh 



0000000000000000 



874 ? ' 

876 ? "gch 

gej fccj" 

878 ? "jh 

ccccccc "" 

888 ? "j 

ccccccc j" 

882 ? "; 

eccccccS" 

884 '' " ' xyz •■•■■■•■•■■■■■■■■■•■■•■••> 

!!• «i !!B":REfURN 

388 POP :GOTO 458 



iceech ich gd j 

jk iceh i H feecc 

fece IM fee gcccce 

feccce fcccd feeccce 



CHECKSUM DATA. 

(see page 13} 

1 DATA 464,743,275,993,778,178,141,254 

,252,689,779,29,59,949,924,7411 

68 DATA 931,498,184,56,689,812,353,717 

,148,123,58,758,838,627,517,7125 

135 DATA 958,385,748,979,993,946,452,3 

59,52, 597 , 739 , 889 , 248 , 697 , 798 , 9744 

285 DATA 749,941,238,673,738,985,684,2 

31 , 165 , 98 , 278 , 58 , 822 ,827,527, 8814 

265 DATA 544,327,671,468,97,73,688,177 

,239,268,35,716,591,79,381,5178 

311 DATA 943,298,522,283,979,925,7,791 

, 321 , 356 ,35,234, 598 , 696 , 433 , 7325 

358 DATA 223,534,986,375,817,977,817,9 

17,448,589,12,389,931,866,978,9691 

428 DATA 945,77,235,381,492,963,681,68 

6,232,113,182,392,374,843,829,7185 

512 DATA 42,185,528,456,798,894,628,52 

5,679,925,595,24,880,286,697,8846 

556 DATA 688,427,396,641,724,965,170,6 

74,293,145,4,582,58,939,274,6988 

586 DATA 998,20,916,48,85,18,461,957,1 

22,588,410,716,602,821,872,7618 

622 DATA 888,243,181,961,241,83,717,28 

,128,795,83,755,671,428,841,6955 

664 DATA 238,679,762,765,349,442,113,3 

68,808,303,457,422,249,69,212,6228 

718 DATA 388,378,340,793,115,569,427,8 

04,393,381,554,487,710,18,685,6962 

756 DATA 817,947,473,318,898,226,473,9 

84,849,747,217,279,972,113,719,9832 

786 DATA 893,251,976,214,874,793,31,32 

,570,743,816,227,733,931,877,8961 

820 DATA 66,180,763,741,645,82,83,12,9 

96,426,681,465,845,858,386,7229 

860 DATA 328,999,260,497,622,603,968,8 

7,285,171,411,914,839,177,7161 



ATTENTION 

USER GROUPS 

I'd like to extend my thanks to all of the Atari 
groups and their officers in response to our 
survey. 

If your group hasn't received a questionnaire, 
please contact me as soon as possible at: 

ANALOG Computing 

Attn: Lee Pappas 
P.O. Box 23 
Worcester, MA 01603 
(617) 892-9230 
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ANALOG COMPUTING 



16K Cassette or 
24K Disk 




TYPE 



by Matthew J.W. Ratcliff 



The fiendish Fontoids have invaded the Earth's at- 
mosphere! 

It's up to you to protect helpless humans. With the 
aid of your trusty Lazer Key Command Console (you 
know, that item sometimes referred to as a keyboard), 
you can zap the invaders. 

You must press the key which has a symbol match- 
ing an attacking Fontoid's shape. The Lazer Image 
Correlator will energize the proper lazer pod to elim- 
inate the intruder. As you zap the Fontoids, more will 
attack, and they'll be increasingly difficult to type. 
They'll also attack more quickly and in larger num- 
bers. As you learn to zap Fontoids, you'll discover 
that your typing skills improve dramatically. 

Using Lazer Type. 

When booted up, Lazer Type's title and credits 
screen will appear. Press the START key for the game 
play options menu. The OPTION key sets the dura- 
tion of the game, which can be from one to nine 
minutes. 

The SELECT key is used to set the difficulty lev- 
el. Level one is for the "hunt and peck" typist. Level 
nine is designed to challenge seasoned veterans of 
the keyboard. This game presents a bit of classical 
music in four-part harmony to help you relax dur- 
ing the hectic game play — the "Hallelujah Chorus" 
from Handel's Messiah . The START key toggles the 
music on and off. 



/ 



> 



Once all the game play options have been selected, 
position your fingers for typing and press the SPACE 
BAR to "become the ultimate typist." 

Playing. 

Lazer Type appears as a galaxy of stars, with the 
lazer pods at the bottom of the screen. The Fontoids 
appear at the top and drift toward the Earth's surface. 
Some will fall much faster than others. 

To do battle, simply press the keys which repre- 
sent the Fontoids that appear. The SPACE is sym- 
bolized by a single character that looks like an S and 
P combined, similar to the E and C used by the Atari 
for the ESCape key. The RETURN key will be rep- 
resented by an R and T in combination, in a similar 
manner. 

Remember that accuracy is most important in this 
game. Incorrect keypresses count against you. Should 
a Fontoid reach the bottom, it will count as one typ- 
ing error. Another will reappear at the top, of the 
same shape and speed. This procedure will repeat 
until you zap the Fontoid with the proper keypress — 
or until the game ends. 

Once you have zapped for the preset time, the re- 
maining Fontoids self-destruct. The title and credits 
screen will reappear, along with your ratings. To end 
Lazer Type early, just press the START key. Scores 
will be lower, since ratings are always based on the 
full time period. 

Your score will be displayed in the form of words 
per minute (WPM) and a typing quality (TQ) percent- 
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ANALOG Computing 

1 ' ' ' ■ . i 

Now only 
a phone call away! 



At your fingertips, you'll find: 
The best programs fr^ia 
'-) New progranns no* 



m|3Utiffg magazine 



■ A long list of 

Updates an( 

• Feedback fn 



.In software 



,emen 



Tfie latest ttBws on Atari 
New softv 
Tecfinical^Bstance 



User grc 
New pn 



.uppoFt 



i 


r 






1 


[ 


1 


h 


M 


Wh- 




jr Think of it. No more 
typing; no more wait- 
ing. Twenty-four hours a 
day, the ANALOG Com- 
puting Telecommunications 
System (TCS) provides you with 
all of the information your Atari 
computer will ever need — 
when you need it. It's the 
perfect companion to 
ANALOG 
Computing 
magazine 




To subscribe on-line using MasterCard or VISA, call: 

617-892-1446 

OR mail your check to 

ANALOG Computing 

iox 23, Woicester. MA 01603. 
OR use the handy card you II find in the back of 
this isgue vyith the Reader Service and Subscriptipn 

cards,! l i ; 



The ANALOG Computing TCS requires an Atari 
computer and modem (disk drive optional). 

RATES' $2500 for 20 on-iine hours 

$2000 for current ANALOG Computing 

subscribers 

No extra fee for 1200 baud users. 



^^ 



Lazer Type corainued 



age. The TQ gives an indication of how accurate a 
typist you are. 



Greetings, Earthiing: 

The Fiendish Fontoids Have Invaded 
The Earth's AtnDsphere> Use uour 
Battle Coiwuter to 4(ZAP« then before 
They Touch Ground' 

Vou Mill Receive an Evaluation 
At the End of your Mission, 
Based on Your Accuracy and Speed> 



or>-r3coM : 



~a:MUTEi 
i_eme:i_ 



GaMe Design; Mat*Hlat- 
Game Consultant: Dave Hiller- 



Lazer Type. 

Practice each level until you can consistently get 
100% before moving on to the next level. WPM in- 
dicates how many equivalent words per minute you 
typed during game play. This number will be lower 
than you might expect, since you're not typing a log- 
ical sequence of characters [i.e., words). 

WPM will provide a valuable point of reference for 
setting goals in future games. Your true typing speed 
may be as much as two times the best rating gotten 
in Lazer Type; typing mistakes are deducted from 
total characters typed before calculating WPM. If typ- 
ing errors outnumber correct keypresses, both WPM 
and TQ will be zero. My best score on level nine is 
34 WPM at 97% TQ, for a one-minute game. I doubt 
that anyone could get 100% over a nine-ininute game 
at level nine. 

As the game progresses, the Fontoids zoom down 
the screen. You'll have to type numbers and, final- 
ly, the math symbols as difficulty increases. Up to 
twenty different Fontoids can appear on the screen 
at one time, in higher difficulty levels or in longer 
games. 

Become a master at the game of Lazer Type and 
you'll be a superb typist as well. D 

Matthew Ratcliff is an Electrical Engineer in Mis- 
souri. He has been programming in BASIC and as- 
sembly language on the Atari since 1982. He's also 
active in telecommunications and is a remote Sysop 
on the GATEWAY BBS, (314J 647-3290. 



Listing 1. 

18 REM *«* LftZER-TYPE IHf* 

29 TRAP 28:? "MAKE CASSETTE t8) , 8R DI 

SK C1J";:IMPUT D5K:IF DSK>1 THEN 28 

38 TRAP 4888e:DATA 8,1,2,3,4,5,6,7,8,9 

,8,8,8,8,8,8,8,18,11,12,13,14,15 

48 DIM DATS C91), HEX C22) : FOR X=8 TO 22: 

READ N:HEXCK)=N:NE}<T H :LINE=998:REST0R 

E 1888: TRAP 128:? "CHECKING DATA" 

58 LINE=LINE*18:' "LINE :"; LINE: READ DA 

T5:IF LENCDAT$}<>98 THEN 228 

68 DATLIN=PEEKC183}HhPEEKC184)«256:IF D 

ATLINOLINE then ? "LINE ";LIHE;" MISS 

INGi":END 

78 FOR X=l TO 89 STEP 2 :D1=ASCCDAT$CX, 

XJ > -48 : D2=ASC (DAT$ CX+1 , X+IJ J -48 : BYTE=H 

EXCD1)*16+HEXCD2] 

88 IF PASS=2 THEN PUT HI, BYTE :NEXT X:R 

EAD CHKSUM:GOTO 58 

98 T8TAL=TeTAL+BYTE:IF TeTAL>999 THEN 

T0TAL=T0TAL-188e 

188 NEXT X:READ CHKSUM:IF TOTAL=CHKSUM 

THEN 58 
118 GOTe 228 

128 IF PEEKC195)<>6 THEN 228 
138 IF PASS=0 THEN 178 
148 IF NOT DSK THEN 160 
150 PUT ttl,224:PUT «1,2:PUT ttl,225:PUT 

ttl,2:PUT »1, 169: PUT «1, 32: CLOSE til: EH 
D 

168 FOR X=l TO 54: PUT ttl,8:NEXT X:CLOS 
E ttl:END 

170 IF NOT DSK THEN 200 
188 ? "INSERT DISK WITH DOS, PRESS RET 
URN";: DIM IN$tl): INPUT IN$:OPEN 111, 8, 8 
,"D:AUT0RUN.SYS" 

198 PUT ttl,255:PUT ttl,255:PUT ttl,169:P 
UT 111, 32: PUT ttl,74:PUT ttl,51:G0T0 218 
288 ? "READY CASSETTE AND PRESS RETURN 
";:OPEN ttl,8,128,"C:":REST0RE 238:F0R 
X=l TO 48: READ N:PUT ttl,N:NEXT X 
218 ? :? "HRITING FILE" :PASS=2:LINE=99 
8: RESTORE 1008: TRAP 128: GOTO 58 
228 ? "BAD DATA: LINE "; LINE: END 
238 DATA 8,38,129,32,168,32,169,8,141, 
47,2,169,68,141,2,211,169,8,141,231,2, 
133,14,169,56,141,232,2 

248 DATA 133,15,169,169,133,18,169,32, 
133,11,24,96 

1888 DATA A9818DDD288DDF288589A98E8DE8 
28A9A98SeA85eCA928858B858DA9e88DE1288D 
4402A9288DDE282ei7262e9A,452 
1818 DATA 2F284B384C99248128ei8E888881 
88281C1814ieeC8884eie0A91720B721A2QeA9 
eiA0e7282822a281A98CA828 , 782 
1828 DATA 2822A282A988A804282822A2828E 
EE28A288AD8AD2C99FB8F99D8328E888F82128 
8D21CADD8328D818CEEE2eD8 , 564 
1838 DATA 8BA2828EEE282897214C1521CAE0 
FFDeE62e9721E8E8AeD8CCA88eB98328AA20Al 
21288D2128AB21289721C8C8 , 686 
1848 DATA AeD8EBA81328CD2D28A1218DB321 
A93F8C762CAe58283922AC762C8818E768AC8A 
D2CeA8BeF9B9032eAA2eA121 , 832 
1858 DATA 4CAB218D88288E012e8Ce22068AD 
8828AC8228AEei2868AD8AD22983D8e2698168 
8DB321A9884CF32ie8533A88 , 388 
1868 DATA 48A268A90C9D42832856E4A268A9 
839D4283A9B49D4483A9219D4583689D4B8329 
F84918898C9D4A832056E428 , 397 
1878 DATA 1726A9188DF4e266865585568454 
6e28EC21A268A98B9D4283A9e09D48839D4983 
ADB3214C5eE428EC21ADB321 , 936 
1880 DATA 8DFB82A2e8A9119D42e3A9eC9D4A 
03A9889D4B834C56E4eA8A8A8A9DC4829829eE 
lDC4829DC4826e4884BAA928,88 
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^^ LaZer Type continued 



L930 DATA 85BB86CA4eCA4eCAA90eS5CB85DD 

85C318A55865CA85CAA55?e5CB85CB20E62218 

A5D465CA85CAA5D565CB85CB , 637 

1100 DATA 68iee4297FCeC3AA85DCE06eBeeD 

A940E02e9e02A?Eei8e5DC85DC1806DC26DD86 

DC26DD06DC26DD18ADF48265 , 103 

1110 DATA DD85DDA00eA208A900850185DeBl 

DC45C34868eA48?007ADB32105D185DlE001FO 

8806D126D00eD126D0CAD0E5 , 905 

1128 DATA 689848Ae00A5De91CAC8A5D191CA 

68A818A5Cae92885CA?ee2EeCBC8C008D8B860 

A90e85D4A2e846BA9e031865 , 856 

1130 DATA BB6A66D4CADeF385D56e088e464A 

414C534B444S473B215455595249454F57564E 

4223434D5e512C2E585A3136 , 901 

1148 DATA 3735383439333230313C3E2D3D2B 

2A4C4A3B000e4B2B2A4Fe05e5523492D3D5600 

4308e042585A34ee333eiB35,146 

1150 DATA 32312C212E4EOe4D2F0052004559 

00545751390e3e3700383C3E464844e0004753 

414772e5e574696E67732C2e,841 

1160 DATA 45617274686Ce96E673A9B9B54e8 

65204e6965eE646973682046eF6E746F696473 

2e48ei7e652e496E7e6164e5,187 

1170 DATA 6490546865204561727468277320 

41746D6F7370686572652E202055736520796F 

75729B426174746C6520436F , 372 

1180 DATA 6D70757465722e746F2e2A5A4150 

2A2074e8656D2062656e6F72659B5468657920 

546F7563682047726F756E64 , 539 

1190 DATA 2E9B9B596F752057696C6C20526S 

636569766520616E284576616C756174696F6E 

9B41742e74686520456E6420|,742 

1200 DATA 6F6620796F7572204D697373696F 

6E2C9B4261736564206F6E28596F7572204163 

63757261637920616E642053,911 

1210 DATA 706565642E9BF2006F7074696F6E 

3A203128206D696E757465739B73656C656374 

3A2e312020206C6576e56C9B,138 

1220 DATA 2073746172743A284F4E20206D75 

7369639BA9018DE320A9008D3C2E20262FADDF 

2085BAA98E85BB20E622A5D4 , 757 

1230 DATA 8DE020AEDD2eBDE4208DDE2020BC 

2BA2ee8EFD228A855220B721A2e4AOei8CF002 

A90020EC21208730AD30e285,630 

1240 DATA D4AD310285D5A012A9ee91D4C8C0 

16D0F9A200AD60249D48e3AD61249D4903A96E 

9D4403A9239D45e3A90B9D42 , 574 

1250 DATA 032056E42O3F2FA200AO0F209238 

A274A03120973eA20AA014209230A23FA03120 

9730A206Aei5209230A256A0 , 572 

1260 DATA 31209730A95F8DC502A9868DC402 

ADE120D88320CD25AD1FD0C907F059C906D019 

AEE128F00ACA8EE12e28CD25 , 958 

1270 DATA 4CA625E88EE12020262F4CA625C9 

05D012AEDD202e372F8EDD20BDE4208DDE204C 

A625C903D022AEDF2020372F , 784 

1280 DATA 8EDF2086BAA20E86BB20E622A5D4 

8DE0202e3F2FA203203F2CCADOFAADFD22F014 

C921D008A9008DFD224CFA2A , 309 

1290 DATA A9e08DFD22203F2C4C5125A9e08D 

e8D2A9038D0FD2A93DA0274CDE25A614E414F0 

FC85CE8D352784CF8C3627AD,312 

1300 DATA 2402AC25e2C921D004Ce26Fei08D 

37278C3827A9218D2402A9268D2502A9008D39 

27A9818D3B2760A510297F85,124 

1310 DATA 108D0ED260281726ADFD22D017AD 

FC02A2FF8EFC02C94e9e04A900F0e4AABD2E23 

8DFD22ADE120De4BCE3B27D0,544 

1320 DATA 46202A27C9FADee34C0E27C9FFD0 

034ClD27C9FED0e34C0827C9FCD0034CEB26C9 

FDF072C9FBF062AC3927F01A,263 

1330 DATA 8C3A27AC3C278C3B27A2e0FeQ320 

2A279D00D2E8E8CE3A27D0F3AD3C2EF00A8D05 

D2ADeAD209F8D0e7A9A48De5,341 

1340 DATA D2A9e08D0402AD0AD22907AAAD0A 

D29D10ieADE320D00DEEE22eD008CEE02eD0e3 

EEE32eADlFDOC907D002854D , 843 



1350 DATA 6C3727202A278D3B278D3C274C4A 

2e202A278D39278D3A274C4A26AC3927D0834C 

4A2e8C3A27A200202A279D01 , 938 

1360 DATA D2E8E8CE3A27D0F34C4A26202C2F 

4C4A2eAD37278D2402AD38278D25826C3727AD 

352785CEAD362785CF4C4A26 , 359 

1370 DATA A00081CEE6CED002EeCF60eOOOeO 

ee00e01414FD04FCA4A4A4A4FB10354855D935 

4855D9354855D948486CAD4e , 323 

1380 DATA 516CA248556CD9000000e0000000 

00354855D9354855D9354855D948486CAD4051 

6CA248556CD900000e003548 , 884 

1390 DATA 6CAD354051A2354855D900000000 

3548eCAD354051A2354855D900000e0035486C 

AD39516eC135559eD9356048 , 698 

1400 DATA 9039ee4890355590D9355590D9e0 

Oe0080000000002F4872902F4872902F487290 

484860722A486C6C2F487298 , 401 

1410 DATA 8e000000000000002F4872982F48 

72902F487290484868722A486C6C2F48729000 

00008e2F4860722A486CeC2F , 299 

1420 DATA 4872900000e0002F4860722A486C 

6C2F4872900e0e00ee2F4860722A48eC6C2F48 

727235485588354C40803948 , 459 

1430 DATA 6090394868900000000000000000 

48484890484848904848489048484890408040 

804080408039723972397239 , 846 

1440 DATA 72356C356CeC6C6CD9356C356C35 

6C356C356C356C6C356C353972397239723972 

408040804080408040804080 , 947 

1450 DATA 4080408048904890489048900000 

00002F4848723548556C3948609000eoe0002F 

4860723548556C394S609000 , 203 

1460 DATA 0000002F486e722A486CeC2F4872 

9e00e00e002F4860722A486C6C2F4872900000 

000000e8000e006C6CD9806C , 816 

1470 DATA 6CD90e6C6CD90e6C6CD9006060Cl 

006060Cie05555AD0e5555AD005151A200A2A2 

A2005151A2005151A20e5151 , 83 

1480 DATA A251A25ie0005555AD005555AD00 

6860C1006060C100606eCie06060C1006C6CD9 

ee6C6CD90000000035486CAD , 67 

1490 DATA 354051A2354855D900e000003548 

6CAD354051A2354855D9e00000e035486CAD35 

4051A2354855D9000000e035 , 293 

1500 DATA 486CAD354051A23548S5D9080000 

00008000003500000035000000350000003500 

35002F0872002F0090002A00 , 92 

1510 DATA 00002A006C0e2888800051008000 

28000008288060002800720000280890550060 

0e55486C002F516C0e2F606C , 78 

1520 DATA 002F4872002F48729835486CAD55 

486CD9e8554888356C55ee3900489848604898 

007248983998489035004088 , 628 

1538 DATA 355540802F6039722F5139724855 

6C6C48556CD98e886C6C35406C6C404C6C6C6C 

6C40600e4872722F48397235 , 350 

1540 DATA 488e8039488880354C80802F4C80 

88394848903948609e2Fe0720e39e0489ee048 

eOAD48556CD935eoeC004855 , 116 

1550 DATA 6C6COOee0072397260902F007200 

3900900000eC6C00486C6C802A6C6C8835eC35 

600060607239606090355555,321 

1560 DATA e04855556C8e5151884eA251A22F 

5151002F5151C1005151905190395135555500 

35555580356e60A2356060Cl , 129 

1570 DATA 39606090396060A2356C6CAD3548 

6CAD35556C80356C556C3500518e354051A235 

405180354051723548556C35 , 12 

1580 DATA 48556C3548556C3548556C8800e0 

OOOOe000008000000000000000FEFEFF002eEF 

20A9FF8DFC82A9e08DFD228D , 536 

1590 DATA 3C2E8DE2208DE32020D52DA013B9 

6414F00620272D4C8E2BB98814F05CB95014F0 

e938E9019950144C812BB93C ,945 

1600 DATA 14D016B91414186981991414C958 

Dei8AD262D9964144C812B38E981993C14B914 

14C981F811D024B92814SDEE , 116 
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1610 DATA 28A93e38EDEE2e993C1428CD2DB9 

8914488CF92AB91414A868283922ACF92AADFD 

22Fe8828772CA9088DFD22AD,9e7 

1628 DATA 1FD8C986D8834CB62E8838834C15 

2BAEDE288E752C2e7C21ADFD22De85CE752CD8 

F3ADE328F8834CBe2E4C132B, 723 

1638 DATA A9e8A88SDA85D8A9E885DBA91885 

DlA9848DEE28BlDA91D8C8D8F9EeDBE6DlCEEE 

28D8F8A287BD8F2C9D0818BD,612 

1648 DATA 172C9D1818BD1F2C9DE8186D272C 

9DF8ieBD2F2C9DF818BD372C9D7818CA18D9A9 

188DF402ee88F8C8FFlBFBlF , 683 

1658 DATA 18e8F8D8F8D8CF868688868C1838 

188Ce6886838188C183e684242663C183C7EFF 

8888883C3C3C0ee88E752C8C , 628 

1668 DATA 762CA2AF8E3C2E8E85D248A88AAD 

eAD289F88De4D288D8F5CAE8BFD8EEA2A48E85 

D2A2888E84D28E3C2EAE752C,487 

1678 DATA AC762C68688ee828SD21283F2CA8 

13D98814F88E8818F8EE342ED8e3EE352E4C97 

218D3D2EB95814196414DeEA,628 

1688 DATA AD3D2E28CD2D8E752C8C7e2CA858 

2839222e9721AE752CE8E8E8E88E752CA8582e 

A12128AB21AE752CAC762CB9,5e4 

1698 DATA 14141869e8A8A988288B22AC762C 

AD262D996414CE392ED838A9eF8D392EAD3B2E 

CD3A2EF886EE3B2E2e3F2EAE , 458 

1788 DATA FC22E838F81EEEFC22AD262DC982 

F8e3CE262DADFC224A8D3E2EAD3A2EC914F883 

EE3A2EEE362ED883EE372E4C,622 



1718 DATA 972123288D2128A1218DB321B964 

1438E981996414F8142eCD2DB91414A8A92228 

3922A9888D3C2E4C9721A988,736 

1728 DATA 8D3C2E28CD2DE8E8E8E88E752CB9 

1414A8A98828AB21Ae57AE752CA9e82e8B2228 

972128CD2D8E752CB91414A8 , 316 

1738 DATA A98e8DB3212e3922A858AE752C28 

A1218DB321A93F28392228A1218DB3212e9721 

B91414C958Dei8EE342ED883,558 

1748 DATA EE352EA9819914144CCA2DA9e899 

8814991414995814992814993C142e3F2E4C97 

2148988AeAeAAA6868A213A9 , 198 

1758 DATA e89D14149D8ei49D28149D3C149D 

5ei49D6414CA18EBA2888EFC22A2e48E3B2E8E 

752CE88E3A2E8E3E2EADDD28,473 

1768 DATA eA8DEE2838A923EDEE288D262D28 

3F2ECE752CD8F8A98e8D362E8D372E8D342E8D 

352E8D382E8D3C2EA98F8D39,8S2 

1778 DATA 2E68ee888888e88F888e808881A2 

8528A92EB91414F8eECAD8F5A813B91414F884 

8818FS68289D2EBDFE22A213, 595 

1788 DATA DD8814F8F3CA18F8998814A98199 

1414A93838ED3E2E8D3D2EAD8AD2293FCD3D2E 

B8F66D3E2E992814A988993C,238 

1798 DATA 142e9D2E388DEE28A93eEDEE2899 

5ei46eADeAD2293FCDFC22B8F6AAe848AD8AD2 

291FC914B8F7A8e86eA2e8Ae, 572 

1888 DATA 13B98814F8e6ESA94B9964148818 

F2Ee88F814A288Aei3B96414Fe84E828272D88 

18F4E008DeECA2828E752C28,478 



ATARI HARDWARE / SOFTWARE 



810 Disk Drives 

810 Disk Drive Kits 

810 Happy Enhancement 
1050 Happy Enhancement 

810 Analog Upgrade Kit 

850 Interface Module 
Atari 800 Computer Kits 

48K Electronics 
Atari 400 Computer Kit 
800 OS lOK ROM 'B' Board 
CPU 'GTIA' Board 
16K Memory Board 
400/800/810/850 Power Adapter 
I/O Data Cable, 6' 
13 pin I/O Plug Kit (cable end) 
13 pin I/O Jack (Port) 
Atari joystick (standard) 
Atari Paddles (set) 
All types of other boards and parts 



Atari Microsoft Basic II 
Cartridge w/manual 
Atari Pilot, Cart, w/manual 
Atari Basic Cartridge Kit 
Atari Assembler/Editor Cart. Kit 



$265 


(7) 


S240 


(7) 


$185 


(4) 


$185 


(4) 


$ 37 


(3) 


$125 


(7) 


$100 


(7) 


$ 47 


(5) 


$ 17 


(2) 


$ 18 


(2) 


$ 19 


(2) 


$ 15 


(3) 


$ 12 


(2) 


$ 3 


(1) 


$ 3 


(1) 


$ 5 


(2) 


$ 8 


(2) 


are available! 


$27 


(3) 


$ 22 


(3) 


$ 15 


(3) 


$ 15 


(3) 



Ordering Information: Al] boards listed are complete 
with all parts and are fully guaranteed. UPS shipping 
charges are shown in brackets nexl to the price. Ship- 
ping charges must be included with all orders. Orders 
may be placed by phone using your VISA or Master- 
Card, or you may mail your order in with a check or 
money order. Hurry, some supplies are limited. 

CALL OR WRITE FOR FREE 
CATALOG!!! 



CENTURIAN ENTERPRISES 

(805) 544-6616 

Post Office Box 3233 

San Luis Obispo, CA 93403-3233 



Sales Office: 890 Monterey Street 
Suite B, SLO, CA 93401 



CIRCLE #124 ON READER SERVICE CARD 



THE ELITE PERSONAL 
ACCOUNTANT 

"The Elite Personal Accountant" is a complete and 
easy-to-use personal financial manager. It is designed 
exclusively for the Atari home computer, and there is 
nothing else like it! Four separate programs interact 
with your data, including defining your financial 
information, adding and changing records, reports and 
utilities. Here are just some of the features: 

• "True" menu-driven design provides help with 
each function. 

• Each function provides examples and/or help 

• 79 calegories you define, in five areas 

• Eight fields per record 

• Add/Edit screen keeps you updated, with posted 
and actual ban[< balance, cash balance, "top 5" 
credit cards, and more — plus a built-in five- 
function calculator! 

• 13 flexible method codes allow for received as well 
as outstanding checks and deposits, checking and 
cash withdrawals, and more — you can even 
transfer between accounts! 

• Edit mode options include Back, Next, Jump (to a 
record), Undo (delete), and Look (search) on any 
field. 

• Figures are automatically reversed, if a record is 
changed or deleted. 

• Up to 1800 records on any standard disk (single 
density). 

• Reports include transaction total, checkbook 
reconcile, category totals, net worth and more. 

• Detailed Report allows you to list certain records, 
under multiple conditions. 

• All reports may be viewed on screen. 

• Complete instructions. 

• Personal, free support. 

• More, more, more! 

Price $48.95, disk only. Requires 48K, basic, and one 
disk drive (will support three). Orders shipped fast and 
prepaid. Washington State residents add $3.86 (7.9%) 
sales tax. Check or money order to ELITE SOFTWARE, 
14897 INTERURBAN AVE. S. #60, SEATTLE. WA 98168, 
Questions or support, call (206) 246-5122. 

CIRCLE #125 ON READER SERVICE CARD 



RAM for ATARI* 1 


NEW LOW PRICES 1 

Fully Assembled • Lifetime Warranty 1 


48K/52K Memory Board 

For ATARI* 400 

52K Addressable Memory 

Easy to Install 


$69.95 


32K Memory Board 

For ATARI* 400 or 800 


$49.95 


16K Memory Board 

For ATARI* 800 


$29.95 


BUILD YOUR OWN MEMORY 




48K/52K Board (No Comp.) 
32K Board (No Comp.) 
16K Board (No Comp.) 
48K/52K Complete KK 
32K Complete Kit 
16K Complete Kit 


$20.00 
$15.00 
$10.00 
$60.00 
$40.00 
$22.00 


Add $2 Shipping & Handling 
Visa & MasterCard Accepted 




'ATARI Is a trademark of Atar 
Dealer Inquiries Welcome 


1, Inc. 


Tiny Tek, Inc. 

Route 1 , Box 795 




Quinlan, TX 75474 




214-447-3025 


^^^ 



CIRCLE #126 ON READER SERVICE CARD 



ANALOG COMPUTING 



JUNE 1985 / PAGE 55 



^^ Lazer Type continued 



1810 DATA 3F2CCADeFAADE12e48A9ei8l>E12e 

2e262F2e902FA284AeeE2e923eA2C5Ae312897 

3eA2e4Ae8F20923eA2D9A031 , 177 

1828 DATA 28973028EE31284B382e262Fe88D 

E12e4C9924A514C514D0FCA9eeA2e79DeiD2CA 

10FA60E8E08AD0e2A2ei68AD , 6 

1830 DATA DF201869308D6A24ADDD2018e930 

8D7D24A94F8D8F24ADE120F00AA9468D9e248D 

9124D08AA94E8D9e24A9208D, 884 

1840 DATA 9124A20eA08D209230A262A82420 

973eA214A08D289238A275A024209730A20eA0 

8E2e9238A287Ae2428973e68,982 

1858 DATA A90e2eB7212e873eA9818DF882AD 

3e0285D4AD318285D5A089A9e791D4C891D4A8 

ieA9e691D4C891D4A02OA941 , 255 

1868 DATA 91D4C8AD3e8291D4C8AD318291D4 

A9E08DF402A288A00020923eA2AFAe3020973e 

A200A0812e923eA2D8Ae302e, 444 

1878 DATA 9730A205A0842e9230A281Ae3120 

9730A2e5AeeA2e923eA221Ae312e9730A20AA0 

112e923eA23FA0312e973eA2,483 

1880 DATA 86A0122e9230A2S6Ae3120973eA9 

C88DC5e2A9648DC482A9AF8D01D28D03D2A9FF 

8Dee02A9FE8D02D268A2008e , 811 

1898 DATA D4A6D4F809CEC702D0ieC6D4FeeC 

EEC7e2AEC782E88FD802E6D4A2FFAe88ADlFDe 

C9e6F0e8CAD0Fe88D8F3F0D4 , 795 

1908 DATA 854DA2FF8EFC82E88EFD226eA9e0 

A2049DC402CA10FA60A98e4CEC218E44838C45 

83A2808E4983A9508D4883A9 , 782 

1910 DATA 898D42834C56E42e202e202e2020 

2e08ClAECEAEClAECCAECFAEC7AEA0C3EFEDF0 

F5F4E9EEE78A2e202e2e2e20 , 365 

1920 DATA 20209BA8AeA8AeA0AeA0A0AeA0A0 

A0A0A0AeA0F0F2E5F3E5EEF4F3A0A0A0AeA0A0 

AeAOA0AeAOAeA8A0AeA89BEC, 3 

1930 DATA ElFAE5F2AeF4F9F8E520202e2020 

28282e285F5F5F5F5F5F5F5F5F5F5F5F9B4849 

542e20F3F4ElF2F42e2e2028,273 

1948 DATA 2e282e28202e28746F2062656769 

6E9B47616D6S20446573e9676E3A20204D6174 

2A5261742E9B47616D652043,867 

1950 DATA eF6E73756C74616E743A20446176 

65204D696C6C65722E9BA0A0A0A0A0A0A8A0A8 

A8AeC8E9F4AeA7D3D8ClC3C5, 955 

1968 DATA A0C2ClD2A7AO04EFAeAOA8A8A0Ae 

AeAeA0AeAeA0A0A0AeA8AeC2E5E3EFEDE5A0F4 

E8E5A0A7D5ECF4E9EDE1F4E5, 618 

1978 DATA A8D4F9FeE9F3F4A7A8AeA8A8A0A0 

9B28576F7264732F4D696E7574652e3A2e2020 

209B547970696E6728517561 , 48 

1988 DATA 6C6974793A2e282e28259BAD3e2E 

0D372ED8e9A28886D486D54C8432AD342E0D35 

2ED0eFAE3e2E86D4AE372E86 , 228 

1990 DATA D5A2644C84323SAD362EED342E85 

D4AD372EED352E85D598CDAe64A90085BA85BB 

85BC18A5D465BA85BAA5D565 , 158 

2888 DATA BB85BB9002E6BC88D8ECAD362E85 

D1AD372E85D846D066D118A5BA65D185BAA5BB 

e5D085BB9ee2E6BCA20e3SA5, 552 

2010 DATA BAED362E85BAA5BBED372E85BBB0 

e7A4BC883e8684BCE84C68328AA213A08F28B2 

32ADI>F2eeA8A186DDF28A2ee , 663 

2828 DATA 85BA38A5D4E5BA85D4B087A4D588 

3ee684D5E84C99328AA213A88E8DA528A9888D 

A62e28EC21A90A8DA72eAe82 , 182 

2838 DATA A288ADA5288DA828ADA620eEA82e 

2ACDA7289086EDA728EEA828CADeEE18693899 

A228ADA82e8DA5288818D4 AD , 458 

2848 DATA A220C93eDeeFA2208EA22eADA32e 

C938D8838EA328A288A9A28D4483A92e8D4583 

A9838D4883A9888D4983A98B,892 

2850 DATA 8D42834C56E48888888ee08e0080 

80008888888888888888880000000088888888 

888888888888888888888888, 492 



CHECKSUM DATA. 

(see page 13} 



18 DATA 338,351,496,811,423,729,280,68 

3,555,573,694,613,29,285,212,6824 

168 DATA 752,198,962,885,491,38,155,13 

3,388,748,186,753,653,846,483,7575 

1860 DATA 626,637,28,241,31,785,981,58 

7,377, 388 , 584 , 398 , 522 , 496 , 426 , 7019 

1210 DATA 543,698,763,855,355,999,982, 

185,58,582,88,156,175,4,756,7119 

1360 DATA 966,755,394,426,286,386,359, 

21,515,118,388,558,548,248,67,5867 

1518 DATA 118,321,545,341,383,188,525, 

508,808,639,912,988,210,55,445,6898 

1660 DATA 294,741,53,30,293,637,918,59 

7,669,165,156,535,74,891,589,6642 

1810 DATA 795,696,875,271,637,556,245, 

868,231,932,59,921,897,314,985,9276 

1960 DATA 451,888,986,146,50,92,865,27 

,789,463,4597 



Due to the extreme length of the assembly Janguage 
listing for Lazer Type, it has been omitted from this 
issue. The listing can be found on the ANALOG Com- 
puting TCS. —Ed. 



r\ 



PASCAL 

For the Atari 

kyan pascal is the most complete package available for learn- 
ing and using the Pascal language. And now, it's available for 
the Atari family of computers. 

kyan pascal is easy to use, lightning fast, and loaded with fea- 
tures. It's a full Pascal implementation and perfect for both be- 
ginning and advanced programmers, 
kyan pascal features: 

• Optimized Machine Code Compiler: 

• Built-in Full Screen Text Editor; 

• String-Handling, Chaining, Include File, and Other 
Powerful Extensions; 

• 13-Digit Arithmetic Precision and Full Graphics 
Support; 

• Built-in Assembler (Allows Full Hardware Control): and, 

• Tutorial Manual with Sample Programs. 

kyan pascal requires 48K of memory and a single disk drive. 
No additional hardware is necessary. And. it comes with kyan's 
MONEY BACK GUARANTEE If not completely satisfied, 
return It within 15 days for a full refund. 
kyan pascal for the Atari S69.95 

lAdd $4 50/copy lor handling S'2 00 outside North America California 
residents add SJ 55/copy for sales tax) 

Send Check/Money O rder to: kyan software, Dept. M 
Call: (415) 775-2923 \^^ 1850 Union St., Ste. 183 

MC/Visa Accepted ' -|(g3| San Francisco. CA 94123 




CIRCLE #127 ON READER SERVICE CARD 



PAGE 56 /JUNE 1985 



ANALOG COMPUTING 



32K Disk only 



HOME USE 





JUNE 



by Wayne Gautney 



After many hours of destroying enemy surges and 
voltage spikes in Livewire!, and defending the Earth 
from killer bombs in Planetary Defense, I began to 
hear my mother complaining, "Is that all you can do 
with that thing. . .just play games?" 

Well, from that moment on, I became determined 
to show her that my Atari 800 was much more than 
a game machine. I started looking for a good "busi- 
ness" application that I could implement in Atari BA- 
SIC. A spreadsheet was out of the question; a finance 
program sounded dull. Then I saw an appointment 
calendar program on the Apple Macintosh which fea- 
tm-ed "windows" that overlapped the screen display. 
This was to be my source of inspiration for the Per- 
sonal Planning Calendar! 



About the program. 

I started with two machine language "speed-ups." 
The first one, MOV$, written by D.K. Titchenell, 
moves large blocks of RAM to different locations at 
high speed. 

The second, FAST$, written by Steve Kaufman, 
transfers large blocks of data to and from disk as fast 
as the disk drive can read or write the information. 
With these routines in hand, I quickly developed the 
text editing and data storage subroutines. 
Using the Calendar. 

When you boot up the Personal Planning Calen- 
dar, you are presented with a "months of the year" 
menu. Select a month, and the program displays a 
small box with 1985 inside it. Use OPTION to in- 
crease the year or SELECT to decrease it, choosing 
from 1985 to 1999. 
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llilil Personal Calendar continued 



When you have the desired year inside the box, 
press START. You will then be asked if the month 
and year that you entered are correct. If not, press 
OPTION and you can re-enter the data; if it is cor- 
rect, press START. The computer will then look for 
the program on disk. You must wait a few seconds 
while the file data is loaded and the Calendar is dis- 
played. 















1985 JANUA| 


OPTIOH WIHOO. ^ 


SUH 


MOH 


TUE 


WED 


^A 'J*li%i TiTTJTgPB^ 








1 


2 
* 


GO TO MEW MONTH 
DELETE ft MONTH 
DISK ftTOFrTORV 




6 


7 


8 


9 




13 


i4 


15 


16 




HIHDOM 






EMIT 




20 
* 


21 


22 


23 




^^^^^^ 




K 








27 
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Personal Planning Calendar. 

If there is no file for the chosen month on the disk, 
you will be prompted to press OPTION to re-enter 
the month and year, or press START to create a file 
for the chosen month on the disk in drive 1. 

You should use DOS 2. OS with this program, and 
you can store about fourteen months on a blank disk. 
Finally, the Calendar will display the month in calen- 
dar form on the screen. Press the OPTION key, and 
the "option" menu ■will scroll down the right side of 
the display. Use OPTION and SELECT to position 
the cursor oyer the desired menu choice and press 
START. 

Selecting the "appointments" option causes a large 
window to appear in the center of the screen. You 
are then asked for the day of the month you wish 
to examine. Type it in and press the RETURN key. 
The prompt message then clears and is replaced by 
the appointment(s), if any, under the selected day. 
You may type over them or enter new appointments. 

When you finish editing the text, press ESCape. 
You'll be prompted to press OPTION to save your 
changes to disk, SELECT to obtain a hard copy on 
your printer, or START, wrhich simply clears away all 
windows. 

The "go to new month" option creates no windows, 



but merely returns you to the "months of the year" 
menu. 

The "delete month" option creates a window and 
asks for the month and year of the month you wish 
to delete. When you delete the month you're work- 
ing with, you are returned to the "months of the year" 
menu. 

Choosing the "disk directory" option opens yet an- 
other window, revealing all files used by the Calen- 
dar. All files are named systematically, for example: 
June 1992 would have the filename D: JUNE .9 2. 

A final word. 

Although the Personal Planning Calendar has been 
tested, errors can still occur. Be especially careful 
when editing text. 

Well, I certainly hope you enjoy using this program 
as much as I enjoyed creating it. My next project? 
I'm going to try simulating DNA and RNA molecules 
on my computer as a science project in Biology. D 

Wayne Gautney, a high school junior, is listed as 
an Academic AJJ-American Student in the 1984 U. S. 
Achievement Academy Yearbook and has won recog- 
nition in both the National Youth Art Competition 
and the Congressional Arts Caucus. He's had his 
Atari 800 for three years and is now learning Action!, 
planning to major in computer science in college. 



DIH FA5T$C39) ,a$C76} ,H0NTH$C18) ,D$f3 
) ,F$(173 ,BLK$C20) .V$(4) ,DDAY5C5) ,CL$fl 
45) , NULLS (200) ,MMS(15) ,ST5(31) 

1 RESTORE 3000: FOR 1=1 TO 39 -.READ A: FA 
5TS «I) = CHRStAl ;NEHT I 

2 NM$=''aanxxi[ninxxxx}'':ERROR=4oe8 

3 DIM M0USf39J7BST62e0} , OPS (200) : FOR I 
=1 TO 39: READ A:M0U5CI)=CHR5(A] :NEKT I 

5 C255=255 : C64=64 : C256=256 : C0M50L=5327 
9:KEY=764 

6 BS="_" : BS (6200) ="_" : BS (2) =BS : 0PS=B5 : 
BLKS=BS:HULLS=BS 

7 GRAPHICS Z:POKE 559, Z: POKE 710, 196 :P 
OKE 712,196:P0KE 709,14:P0KE 752,1 



8 POSITIOH 2.1; POKE 82. 2: POKE 83.39;? 
■'l!l im !T » l ' li m il M t ^ T! M! T! m' rfTTn 




PERSONAL PLANNING CALENDAR 



Mayne Gautnei 



t»«t«;g| 



for ANALOG ConPUtiD' 



12 ? ■■ rTTTT lM ! m ! m ! m i l !II!TrTTTT 
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15 
16 
17 
18 
19 
28 
21 



■► 
•► 
■► 
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■► 
•► 



A JANUARY G JULY 
B FEBRUARY H AUGUST 
C MARCH 
D APRIL 
E MAY 
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SEPTEMBER 
J OCTOBER 
K NOVEMBER 
L DECEMBER 



KE 559, 34: CLOSE «1 



PLEASE SELECT MONTH 



IPO 
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22 OPEM ltl,4,Z,"K:"5eET ttl,R:CL05E 111 

23 R=R-64:IF R<1 OR R>12 THEN 22 

24 RESTORE 9999+R:REA0 MONTHS , HUH : H=R 

36 DAY=V: POSITION 2,6:? MM$ : V=1985:X=1 
1 

37 ? ■•► ENTER Y EAR BELOW":? :? 

38 ? "USE m JlHa;P TO INCREASE YEAR":? 
:? "USE ■MfMlT TO DECREASE YEAR":? 

:? "PREssnEDaal to select year":? 

39 ? : ? " I I " 

40 ? " I Bil51Ml985| ' 



41 ? 



I":P0KE 559, 34: FOR 



R=l TO 22: NEXT R 

42 G=PEEKCCONSOL}:IF G=7 THEN 42 

43 IF G=3 THEN Y=Y+1 

44 IF 6=5 THEN Y=Y-1 

45 IF G=6 THEN YEAR=V:GOTO 58 

46 IF Y<1985 THEN Y=1999 

47 IF Y>1999 THEN Y=1985 

48 POSITION X,18:? Y:FOR R=l TO 32:NEX 
T R:GOTO 42 

58 POSITION 2,6:? NH$:? 

51 ? "YOU ENTERED THE FOLLOHIHG HONTH: 

■•.■7 

52? MONTH*;", ";YEAR:? :? 

53 ? "IF THIS IS CORRECT, THEN" 

54 ? "PRESS THE START KEY.":? 

55 ? "IF IT IS INCORRECT, THEN PRESS" 

56 ? "THE OPTION KEY." 

57 A=PEEKCCONSOLJ:IF A=7 THEN 57 

58 IF A=6 THEN GOSUB 908:6010 60 

59 CLOSE Ml: CLOSE 112: CLOSE 113: GOTO 7 
68 ? "l<i":POKE 559,Z:P0KE 7ie,2e6:P0KE 
789,6:P0KE 712,286:? :POKE 82,2:P0KE 8 
3, 39: POKE 752,1: GOTO 62 

61 ? "I i I I i I I 
1": RETURN 

62 ? :? "i 



63 
64 



■H 



65 ? "ISUN IMON ITUE |HED |THR IFRI |S 
AT I" 

66 FOR T=l TO 5:? "I 1 1 I 

I I I |":GOSUB 61: GOSUB 61 :N 



EXT T 
78 t "H 



+ 



+ 



71 ? "I 

72 ? "»- 



J I 



II > ■Q' II I 



I 



I' 



73 MDPT=C48-LENCM0HTHSJJ/2 

74 POSITION MDPT,2:? MONTHS 

75 POSITION 3,2:? YEAR :POSITION 33,2:? 
YEAR 

76 GOSUB 310 

77 POKE 559,34 

88 IF PEEK(C0NS0L)<>3 THEN 88 

98 GOTO 488 

318 GOSUB 1888 

358 SP::l+5»C:S=l:F0R Y=6 TO 21 STEP 3 

360 FOR X=6 TO 37 STEP 5 

365 IF S=l THEN X=SP 

367 IF S>9 THEN X=X-1 

378 POSITION X,Y:? S 

371 IF STSCS,SJ="«" THEN POSITION X,Y+ 

1:^ "«" 

374 IF S>9 THEN X=X+1 

375 IF S=T THEN RETURN 

376 S=S+l:NEXT X:NEXT V: RETURN 

480 GOSUB 1208: POKE 8 2.22 

481 POSITION 22, Z:? "^^n^^^n^^^ 



I 



482 ? 

483 ? 



V 



OPTION HINDOH 



j::. 



? "I 



412 Y=5*X=1 

413 G=PEEKCCONSOL]:IF G=6 THEN 428 

414 IF G=7 THEN 413 

415 IF G=5 THEN Y=Y+2:X=X+1:IF X>5 THE 
N Y=5:X=1 

416 IF G=3 THEN Y=Y-2:X=X-1:IF X<1 THE 
H Y=13:X=:5 

417~P0SITI0N 23,5:? CLS 

418 POSITION 23,y:? aS(C1S«X}-14,15«X) 

419 GOTO 413 
428 CHOICE=X 

421 IF X=2 THEN FOR T=l TO 5: CLOSE HI; 
NEXT T:GOTO 7 

422 IF X=3 THEN 688 

423 IF X=4 THEN 1228 

424 IF X=5 THEN GOSUB 1285: GOTO 88 

426 POKE 82. 12; P OSITION 11,7:? "^^"^ 
^^^■^'■■■^■■■^":FOR T=8 TO 28:P0SITI 
ON 11, T:? "I I" 

427 NEXT T: POSITION 11,21:? "^hmhim 



APPOINTMENTS 



484 GOSUB 650 



428 POSITION 13,9:? "Please enter the" 

429 POSITION 13,18:? "date you wish to 

• I 

438 POSITION 13,11:? "exaHine.":POKE 7 

431 TRAP 431: POSITION 13,13:? "i* 44 
4";: INPUT 1116 ;DDAY$: POKE 752,l:DD=VALf 
DDAY$):IF DD<1 OR DD>NUM THEN 431 

432 POSITION 13,9:? " 
4«-«-*«- «•♦«■«•****•**♦«•«•** 

♦*•*«■*«• «-4-***«-*«-4-«- «•♦*■€-_ 

433 POSITION 13,8:? ' 
:COL=l:ROH=l 

434 OP$=BS C288*DD-199> 

436 FOR T=l TO 10 

437 POSITION 12,T+9:? OPS C28«T-19,28»T 
J:NEXT T:POKE 82,12:P0KE 83,32:? "►"; 

439 CLOSE 111: OPEN ltl,4,Z,"K:":C0L=l:R0 
M=l : BLK$=0PS : POSITION COL+18 , ROH+9 : POK 
E 752, Z:? "I"; 

448 GET ltl,R:IF R=155 THEN 455 

441 IF R=27 THEN 588 

442 IF R=126 THEN 468 

443 IF R>155 AND R<ie8 THEN 448 

444 IF R>27 AND R<32 THEN 448 

445 IF R>124 AND R<128 THEN 448 

446 IF R>253 THEN 448 

447 C0L=C0L+1:IF R=32 THEN R=95 

448 IF C0L>2e THEN C0L=2e 

449 IF COL<Z THEN COL=Z 

458 POSITION COL+18, ROH+9: IF R=155 THE 
N ? "tt";CHRSCR>:R=95:BLKSCC0L,C0LJ=CH 
RSfR) :GOTO 448 

451 BLKSCC0L,C0L)=CHRS(R}:IF R=253 THE 
N BLK§CC0L,C0L)=CHRSC95) 

452 ? CH RS CRl ; : GOT O 448 

455 REM ■iM!i;ei:liliM 

456 0PSC28«R0H-19,28»R0iO=BLKS 

457 ROH=ROH+l:IF R0H>18 THEN R8H=1 

458 BLKS=0P$C2e«R0H-19,2eWR0iO 

459 C0L= l;R=155;G0T 458 
468 REM ■iHiiri.iJJIiU 

461 C0L=C0L-1 

462 IF C0L<1 THEN C0L=1:G0T0 440 

463 ? "*_t"; :BLKSCC0L+1,C0L+1J="_":G0T 
448 

588 GOSUB 940 

581 0P$C20«R0H-19,20«R0H)=BLKS 

582 IF 0PS=NULLS THEN ST$CDD,DD)=" ":G 
OTO 504 

583 STS CDD , DD J ="•" : BS C280«DD-199 , 200*0 
D}=OPS:TRAP ERROR 

584 CLOSE 111: OPEN ttl,8,Z,FS 

585 ? Ill : STS 

586 FASTS(18,18]i=CHRSCll) 

587 D=USR CADR CFASTS) , 1 , ADR CBS) , 6288) : C 
LOSE 111: POP :GOTO 60 
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698 POSIT 



atuuuu^A? "* 



eei POSITION 4,8:? '1 ENTER HONTH TO DE 
LETE: I" 

602 POSITION 4,9:? "| ENTER YEAR OF HON 
TH : I" 

603 POKE 752,0: POSITION 4,10:? "| 



[DISK &IR 



606 TRftP 68: POSITION 27,8:? ■'+*■■; 

607 INPUT ttl6,MM$:P0KE 752,1:? :FOR T= 
1 TO LENCMM$]:IF MM$CT,TJ=" " THEN MMS 
CTJ= GOTO 615 

688 NEXT T 

615 RESTORE 10088: TRAP 628 

616 FOR T=l TO 12 

617 READ FS:IF MM$<>F$ THEN 617 

619 IF I1H$=M0NTHS THEN FG=99 

620 GOTO 622 

621 POP :? "0": CLOSE ttl:GOTO 606 

622 FS="D:":IF LENCMHSXO THEN F$CLENf 
FSJ+1}=HM5:GQT0 625 

623 F$(LENCF$)+l)=MM$fl,8) 

625 POKE 752,0: POSITION 26,9:? "++■'; :I 
NPUT ttl6;Y$:P0KE 752,1 

629 YE=VALtYS) :IF YE<1985 OR YE>20e8 T 
HEN ? CHRSC253] :GOTO 625 

630 FS(LENCFS|+1)="." 

631 YE=YE-1900 

632 F$CLEHCFSJ+1J=STRSCYE} 

633 POSITION 4,8!!? '1 DELETING HONTH... 

634 POSITION 4,9:? "1 

I" 

635 TRAP 4000 :XIO 33,tt4,Z,Z,FS:IF FG=9 
9 THEN RUN 

636 GOSUB 1205: GOTO 80 

650 ? "I I":? •'iGEGcnan 

[IIEBiHU":? "I J" 

653 ? "I GO TO NEW HONTH |":? "r 

"•:? "I DELETE A HONTH J" 
656 ? "1. I":? "rD] 

ECTORY >■:? "I 
659 ? "fEXIT MINDOH |":? 

661 iki''^ 



APPOINTMENTS GO TO NEW MONTH 
DELETE A MONTH DISK DIRECTORY EKIT WIN 



665CLS="APP0INTHENTS 44*+****tt**** 
*+*G0 TO NEM HONTH*********+**+*<-+*DEL 
ETE A HONTH **+**-**t***^+**+*t" 

666 CLSaENfCLSJ+lJ="DISK DIRECTORY +♦ 
*-+**-**<-***-***-*-*EXIT HINDON " 

667 RETURN 

900 REH I_ 

901 CLOSE ttl 

902 F5="D : " : FS CLEH CF5J +1J =HQNTH$ 

983 IF LENCH0NTH$]<8 THEN fIcLENCFS)+1 
) =■' . " : F$ CLEN CFSJ *1J =STRS CYEAR-1988) : GO 
TO 985 

984 F$ Cll , 11 J =■' . ■■ : FS C12 , 13) =STRS CYEAR- 
1900) 

985 TRAP 910: OPEN ttl,12,Z,F$ 

986 INPUT t»l,STS 

987 FASTS C18, 18) =CHR$C7) 

988 X=USR CADR tFASTS) , 1 , ADR CBS) , 6288) 

989 CLOSE ttl: RETURN 

910 TRAP 2808: CLOSE ttl: GOSUB 2000 

911 ? "1(4444 ^CREATING NEH H0NTH44" 

912 ? "^FILENAHE: "jFS 

913 TRAP ERROR: OPEN ttl,8,Z,FS 

914 FASTSC18,18)=CHRSC11) 

915 STS=" ":STSCNUH)=" " :STSf2)=STS :? 
ttljSTS 

916 BS="_"':BSC6200)="_":BSt2)=BS:? ttl; 
BS: CLOSE ttl: RETURN 

940 POKE 752,1: POKE 83, 39 : POSITION 14, 
22:? " SELECT=PRINT OUT" 

941 POSITION 14,23:? "OPTION=SAWE STA 
RT=EXIT"; 



CREATE MONTH 



CALCULATE DAYS OF MONTH 



942 AA=PEEK(CONSOL):IF AA=7 THEN 942 

943 IF AA=3 THEN RETURN 

944 IF AA<>5 THEN POP : GOSUB 1205: GOTO 
80 

119 REH ■j;H;fiiiia 

961 CLOSE tt5:TRAP 981: OPEN tt5,8,Z,"P:" 

2I?»£9" T=^ TO^LENtOPS):IF OPSCT,T)=CH 
RSC95) THEN OPSCT,T)=" " 
963 NEXT T 

965 ? ttS ; " MMlCKlCWMKKKMICICmtMlCKKMMIC " 

966 ? tt5;"» APPOINTHENTS »" 

967 ? tt5; " KKKKMMKKMKlCmCKKKKMKKMlC " 

968 ? ttS:? tt5;H0NTHS;" ";DD;",";YEAR:? 
tt5 

969 FOR T=l TO 181 STEP 20:? tt5;0PS(T, 
T+19) :NEXT T 

979 ? tt5:? tt5 ; " muxxukxhxxxxkhxhuhukkk " 

980 CLOSE tt5 

981 POSITION 14,22:? " 

II 

982 POSITION 14,23:? "OPERATION COHPLE 

983 FOR f=l TO 200:NEXT TrPOKE CONSOL, 

984 POP ; GOSUB 1205 : GOTO 80 
1888 REH 

1881 VE=YEAR-1985 

1882 RESTORE 1810+YE 

1883 FOR T=l TO H:READ C:NEXT T 

1085 RESTORE 1058:F0R R=l TO H:READ T: 
NEXT R:IF H=2 AND YEAR/4=INT CYEAR/4) T 
HEN T=T+1 
1006 RETURN 

1818 DATA 3,6,6,2,4,7,2,5,1,3,6,1 

1811 DATA 4,7,7,3,5,1,3,6,2,4,7,2 

1812 DATA 5,1,1,4,6,2,4,7,3,5,1,3 

1813 DATA 6,3,3,6,1,4;6;2;5;7;3'5 

1814 DATA 1,4,4,7,2,5,7,3,6,1,4,6 

1815 DATA 2,5,5,1,3,6,1,4,7,2,5,7 

1816 DATA 3,6,6,2,4,7,2,5,1,3,6,1 

1817 DATA 4,i,i,4,6,2:4;7:3;5;i;3 

1211 R$I5 §'2,2,5,7,3,5,1,4,6,2,4 

1819 DATA 7,3,3,6,1,4,6,2,5,7,3,5 
IS?9 R5I5 1'*'<^7,2,5,7,3,6,1,4,6 

1821 DATA 2,6,6,2,4,7,2,5,1,3,6,1 

1822 DATA 4,7,7,3,5,1,3,6,2,4,7,2 
f2?5 R5I5 5,1,1,4,6,2,4,7,3,5,1,3 
1824 DATA 6,2,2,5,7,3,5,1,4,6,2,4 
1858 DATA 31,28,31,38,31,38,31,31,38,3 
1,38,31 

1200 SCR=PEEK(88)4PEEKC89)«256 

1201 SAUADR=SCR-1824 

1282 D=USRCADRCH0VS),SCR,SAVADR,980) :R 

ETURN 

1205 D=USR CADR CHOVS) , SAVADR , SCR , 988) : R 

ETURN 

1220 REH ■>>i.iMiiH;laIiiiil;l',^ 

1222 CLOSE ttl: OPEN ttl ,6.Z. "D;*.*" 

1223 POSITION 7,3:? "f-^i-^iAii^-iiiiiiiM 



1224 POSITION 7,4:? "I DISK 
I" 

1225 POSITION 7,5:? "Imb^hi 



DIRECTORY 



1226 FOR T=l TO 16:TRAP 1238:INPUT ttl, 
FS: GOSUB 1248 

1228 POSITION 7,T+5:? "| ";FSC2,17) ;" I 
":HEXT T 

1230 CLOSE ttl 

1231 POSITION 7,T+5:? "JH^^^""^"^" 

1232 POSITION 7,T+6:? "|";FS;" I" 

1233 POSITION 7,T+7:? "I^^mm^^^^ 



1234 POSITION 14,23:? "PRESS START"; 

1235 IF PEEKCC0NS0L)<>6 THEN 1235 

1236 GOSUB 1205: TRAP ERROR: GOTO 80 
1240 IF FSC5,16)="FREE SECTORS" THEN 1 
238 
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1241 TRAP 1242: IF UALCF$(11,12))>84 TH 
EN RETURN 

1242 POP :T=T-l:NEXT T: RETURN 
2600 ? "HQ+4" 

2001 ? "THERE IS NOT A FILE FOR ";HONT 
H$:? "ON T HIS PI SK ! 4^44" 

2002 ? " nQQranf = RE-ENTER DftTA44" 

2003 ? " i-iW;lM = CREATE NEM FILE" 

2004 G=PEEKfCONSOL):IF G=6 THEN RETURN 

2006 IF G=3 THEN POP : CLOSE tt2: CLOSE tt 
3: CLOSE til: GOTO 7 

2007 GOTO 2004 

3000 DATA 104,104,104,10,10,10,10,170, 
169 , 7 , 157 , 66 , 3 , 104 , 157 , 69 , 3 , 104 , 157 
3010 DATA 68,3,104,157,73,3,104,157,72 
, 3 , 32 , 86 , 228 , 132 , 212 , 160 , , 132 , 213 , 96 
3100 DATA 104,104,133,215,104,133,214, 
104,133,217,104,133,216,104,133,218,10 
4,170,160,0 

3110 DATA 177,214,145,216,200,208,4,23 
0,215, 230 , 217 , 202 , 208 , 242 , 198 , 218 ,16,2 
38,96 

4000 REM HT^^Ij^HhijiIPIj^H 

4001 GRAPHICS Z:P0KE 710, 70: POKE 709,1 
4:P0KE 82,2:P0KE 83,39:? 

4002 G=PEEKC195J:IF G=170 THEN 4007 

4003 ? "AN ERROR HAS OCCOURED!":? :? 

4004 IF G=162 THEN ? "THERE IS NOT ENO 
UGH ROOM ON THE DISK TO CREATE A FILE 

FOR ":? :? :? :? "RUHtff***":END 

4005 IF G=144 THEN ? "THERE IS NO DISK 
IN DRIVE ttl, OR THE DISK HAS A HRITE 

-PROTECT NOTCH ON IT.": END 

4006 ? "ERROR - ";G;CHR$ C155> ;"444RUNt 

tt*t*":END 

4007 ? "THE FILE FOR THAT IWNTH IS NOT 
ON THIS DISKETTE. ";CHR$C155); "444 

RUNftt*^<-*":END 

10000 DATA JANUARY, 31 

10001 DATA FEBRUARY, 29 

10002 DATA MARCH, 31 

10003 DATA APRIL, 30 

10004 DATA MAY, 31 

10005 DATA JUNE, 30 

10006 DATA JULY, 31 

10007 DATA AUGUST, 31 

10008 DATA SEPTEMBER, 30 

10009 DATA OCTOBER, 31 
leoie DATA NOVEMBER, 30 
10011 DATA DECEMBER, 31 



CHECKSUM DATA. 

fsee page 13) 

DATA 730,268,292,294,731,491,922,802 

,645,837,877,25,37,169,593,7713 

16 DATA 467,281,180,218,35,206,776,926 

,294,347, 349 , 984 , 737 , 323 , 467 , 6598 

42 DATA 257,683,692,990,282,291,727,34 

8,747,339,195,137,240,167,267,6362 

58 DATA 273,763,817,766,640,662,393,71 

5 , 976 , 374 , 61 , 280 , 359 , 997 , 114 , 8190 

76 DATA 773,800,911,454,794,964,171,70 

1 , 829 , 883 , 556 ,823,115, 699 , 307 , 9788 

401 DATA 63,494,858,983,485,606,549,94 

8 , 186 , 893 , 511 , 713 , 882 , 639 , 592 , 9322 

423 DATA 420,514,242,259,784,239,875,9 

23 , 582 , 875 , 793 , 143 , 258 , 210 , 769 , 7878 

441 DATA 483,752,856,580,860,759,245,3 

96 , 222 , 269 , 340 , 793 , 3 , 849 , 856 , 8263 

458 DATA 825,247,465,55,132,163,989,83 

1 , 498 , 583 , 413 , 628 , 236 , 281 . 888 , 7226 



601 DATA 964,643,20,177,936,768,363,14 
7,77, 865 , 717 , 231 , 815 , 944 , 297 , 7964 
629 DATA 482,412,857,61,487,198,406,66 
, 783 , 888 , 34 , 602 , 317 , 548 , 679 , 6828 
667 DATA 616,706,652,722,849,21,729,34 
8,18, 492 , 693 , 198 , 629 , 182 , 885 , 7732 
914 DATA 245,32,510,968,238,826,307,25 
8 , 618 , 634 , 436 , 787 , 204 , 911 , 206 , 7180 
968 DATA 630,84,587,679,605,965,325,61 
9 , 100 , 118 , 596 , 389 ,85,791, 579 , 7152 
1011 DATA 598,589,608,595,579,591,596, 
611 , 623 , 588 , 579 , 601 , 592 , 604 , 768 , 9122 
1200 DATA 716,614,786,773,715,878,267, 
253 , 923 , 342 , 965 , 862 , 746 , 212 , 273 , 9317 
1234 DATA 588,177,754,725,877,305,993, 
423 , 939 , 36 , 279 , 82 , 727 , 717 , 754 , 8362 
3100 DATA 900,399,236,798,68,772,59,11 
8 , 403 , 977 , 791 , 80 , 619 , 652 , 137 , 7009 
10005 DATA 364,382,623,36,795,97,15,23 
12 
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ATARI PROGRAMMING AIDS 

TRICKY TUTORIAL SERIES 

No. 1 DISPLAY LISTS $7.95 

No. 2 SCRPLLING $7.95 

No. 3 PAGE FLIPPING $7.95 

No. 4 ANIMATION $7.95 

No. 5 PLAYER MISSILE GR $7.95 

No. 6 SOUND/MUSIC $7.95 

No. 7 DISK UTILITIES $7.95 

No. 8 CHARACTER GR $7.95 

No. 9 GTIA GRAPHICS $7.95 

No. 10 SOUND EFFECTS $7.95 

No. 11 MEMORY MAP $7.95 

No. 12 SAM TUTORIAL $7.95 

No. 13 BASIC PROG TOOLS $7.95 

No. 14 ADVANCE PR TOOLS $7.95 

No. 15 FANCY FONTS $7.95 

EDUCATIONAL a UTILITIES 

MUSIC MAN $9.95 

INSTEDIT $7.95 

GRAPHICS MACHINE $7.95 

MINI WORD PROCESSOR $4.95 

BOB'S BUSINESS $4.95 

DATABASE DIALER $7.95 

FONETONE $4.95 

BOWLERS DATABASE $4.95 

GRADE BOOK $4.95 

Call toll-free outside Texas: 1-800-433-2938 
- Inside Texas call: 817-292-7396 

WEDGWOOD RENTAL 

5316Woodway Drive 
Fort Worth, Texas 76133 
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THIS MONTH: 

Atari^s 
founder 
Nolan 
Bushnell 
talks about 
his future 
and the 
new Atari 



by Arthur Leyenberger 

In last month's column I mentioned 
that I hoped to have some robot-related 
news and projects to talk about this is- 
sue. But, before I could even sit down 
at the keyboard , I got a chance to meet 
and talk with Nolan Buslmell. I thought 
you would enjoy hearing what he's up 
to these days. 

If you look carefully, we are talking 
about robots. Next month, we'll definite- 
ly get down and do some robot comput- 
ing with Andy and Verbot. 

Nolan Bushnell is a name that's very 
/amiJiar to Atari enthusiasts. He is cred- 
ited with inventing the video game in 
the early 1970s. While everyone else was 
playing pinbail, Nolan came up with a 
deceptively simple idea: allow one or 
more people to control a video blip on 
a CRT. We all know that his creation was 
the now-famous Pong. 

Bushnell is also known for founding 
Atari and guiding it through the forma- 
tive, video game years. Warner Commu- 
nications eventually bought the company 
from Bushnell for a cool $27 million. 

Being a creative person and an entre- 
preneur, Nolan next founded Androbot 
Company. Androbot was one of the first 
companies to manufacture a personal 
robot. 

Androbot wasn't the only venture that 
occupied Nolan's time. While children 
may not readily recognize the name 
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Bushnell, they certainly know of Chuck 
E. Cheese Pizza Time Theatres. That 
and Androbot were two of the many 
companies founded or/incuiced by Bush- 
nell's Catalyst Technologies Company. 
Catalyst's mission was to help launch 
new high-technoJogy, consumer-oriented 
companies. 

Bushnell sold Androbot in 1984 and 
applied his energies to Axlon, Inc., a 
company specializing in the design and 
manufacture of "personality-based" toys 
and games. Says Bushnell, "I had so 
many ideas for toys and games after I left 
Atari that I decided to form Axlon. The 
concept of mental exercise combined 
with sheer fun and games is the corner- 
stone philosophy of Axlon, and one we 
will promote through all of our prod- 
ucts." 

I had a chance to meet and talk brief- 
ly with Nolan at the 1985 New York Toy 
Show, where AxJon was displaying sev- 
eral products of interest to Atari users. 
Andy the robot is an Atari computer 
peripheral. 

Andy's main features are light, sound 
and bump sensors that act as his eyes 
and ears. He connects to any Atari com- 
puter via the joystick port and, using a 
"personality editor" (a logo-like com- 
puter language), can be programmed to 
move around and make sounds. Like any 
current home or personal robot, Andy 
can't really do very much, but he has 
educational value in the field of pro- 
gramming. As the advertising slogan 
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I believe that there is 
still so much to he 
done with making 
computers easy to 
use and useful. The 
Macintosh and the 
GEM system are 
attempts to make 
computing what it 
should he. 
—Nolan 
Bushnell 




points out, 'Andy can't bring you break- 
fast in bed, but he wiiJ give you food for 
thought." 

Axion was showing another noncom- 
puter product that was very unusual. Pet- 
sters are described as plush electronic 
toys. Petsters combine the look and feel 
of a stuffed animal with microprocessor- 
controJIed behavior. They respond to 
sound, h'ght and touch, and resemble a 
household pet in many wa}'s. Both the 
Catster and the Dogster come when they 
are called, go to sleep when the lights are 
turned out, and can be allowed jree to 
roam in their environment. 

It's amazing how much like a real pet 
a Petster behaves. Be/ore going to sleep, 
the Catster or Dogster will circle its ter- 
ritory to gain maximum comfort. The 
Catster will purr when it's petted, meow 
occasionally and even assume dijjerent 
moods. 

Petsters are 15 inches long, 11 inches 
wide and about 7 inches tall. They oper- 
ate on five D-cell batteries and are ex- 
pected to cost under $100. 

The other toy that Axlon was show- 
ing is called Alexander Graham Bear. 
A.G. Bear is the new teddy hear on the 
block. In addition to being cute and cud- 
dly, he talks. . .not in English, but in 
"bearese." 

Like all of the other Axlon toys, A.G. 
is electronically controlled. When you 
talk to him, his electronic circuits store 
the number of audible syllables, the syl- 
lable length and their approximate val- 



ue. He then plays this loosely-mimicked 
phrase back to you. He can also begin 
talking with you spontaneously and may 
assume different moods. A.G. Bear may 
very well be the Cabbage Patch pheno- 
menon of 1985. 

Be/ore talking with Nolan Bushnell, I 
sat and listened as he did a phone inter- 
view. With his tongue implanted /irmly 
in his cheek, Nolan talked about Axlon's 
new toys, mainly the Catster. 

Saying that clawing, scratching and lit- 
ter boxes are things of the past, Nolan 
spoke of this new toj' as being a playmate 
that would interact with its user in ad- 
dition to being comforting and compan- 
ionable. Winking at me, Nolan told the 
phone interviewer that there are a cou- 
ple of things the Catster won't do: it won't 
catch mice and it won't jump up on your 
lap. 

The Catster has wheels instead of legs 
and is primarily a floor cat. Again, he 
made the comparison with a real pet. 
"The difference between a toy and a pet 
is that no one ever turns a pet off. You 
don't need to turn this product off, either. 
It operates for a long time on one battery 
charge and, when it is asleep, uses very 
little battery current." 

Nolan told the interviewer, "I don't like 
to use the word 'robot' because this is 
really a cuddly, warm and affectionate 
creature. Robots are considered to be 
kind of cold and unfriendly, although it 
does have some of the elements that are 
found in industrial robots." 



Our interview started when Nolan 
ended his phone conversation. 

AL: I noticed that you really enjoyed 
doing that phone interview. 

NB: Oh yeah! You have to have a little 
bit of fun with them. The other part of 
it is how you maintain press momentum 
. . . Because, if you are dry and uninter- 
esting, they say, "Hey, gee, that's boring 
for my listeners." But, if you are half 
comedian and half pitch man, then it 
perpetuates itself. 

AL: You've been a showman from way 
back, and I think that is part of the fun. 
I want to pick up on one of the things you 
mentioned: that Axlon is not marketing 
the Petsters as robots. I understand that 
the toys really are sophisticated robots 
inside. Why are you playing down the ro- 
bot thing? 

NB: The reason for it is very clear. 
Boys and "techie" adults will see it for 
what it is, but if you start saying that it 
is really a complex robot, market re- 
search says that it just turns the girls off. 
We see this as being a strong crossover 
product aimed at both boys and girls, 
and adults. 

AL: As you said, the Catster is a cud- 
dly, warm toy. I have three cats at home, 
and none of them obey me. This could 
be the first cat that ever obeyed me. Is 
it programmed occasionally not to obey 
its commands? 
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The Catster. 



NB: That's correct. There are 256 (a 
good computer number) different per- 
sonalities that the pet can assume. It is 
really a random number generator in- 
side. 

AL: You have been quoted as saying 
that the domestic pet is obsoJete. Do you 
really believe that, or is that a market- 
ing thing? 

NB: There is an important marketing 
notion that says that what you want to 
do is create controversy. The best way to 
have someone sell your product is to vio- 
lently oppose your product. That will 
force a whole set of other people to em- 
brace it. So, if you can divide the nation 
into people who hate your product and 
those who love your product, you have 
a better chance of getting a 50 percent 
market share. Anybody who has a 50 
percent share is doing great. 

So you get this debate going. The 
worst thing that can happen to a prod- 
uct is anonymity. By setting up this pur- 
posefully outrageous statement, you 
create the controversy. We were going to 
go so fcir as to include a coupon to put 
your real pet to sleep. We realized that 
would be somewhat tasteless. 

AL: You have been involved in many 
endeavors and seeding different compa- 
nies; do you think what you are into now 
is going to be what you have been look- 
ing for? 

NB: I have really been a fish out of wa- 



ter since I sold Atari. I really enjoyed the 
technical product business and manu- 
facturing. Since 1 left Atari, 1 have been 
involved mostly with ventm'e capital ac- 
tivities, and that is not nearly as satisfy- 
ing, because you are always a staff 
person. 

You're not line, or rolling up your 
sleeves and saying, "We're going to do it 
this way." Rather, you're on the board of 
directors and you say, "Hey, wouldn't it 
be nice if we did so and so?" It was al- 
ways someone else articulating it. 



There is cm important 
marketing notion 
that says that what 
you want to do is 
create controversy. 



It was really frustrating, too, because 
in venture capital, you are always work- 
ing on somebody else's problems. The 
problem companies are the ones you are 
always working on. So I decided that I 
would de-emphasize my venture capital 
activities and focus my time and efforts 
on a particular coinpany — and that is 
Axlon. 

AL: What is going on with Androbot 
these days? 



NB: Androbot is being sold. I sold 
most of my interest about a year ago. It 
is one of those things that, when the 
products don't go in the direction that 
you want to, you get out. They were 
heading towards industrial robots and 
that type of thing. 

AL: Have you seen the new Atari 
products that jack Tramiel announced 
at CES, and wouJd you like to comment 
on them? 

NB: I think they look strong. It's one 
of those things that just might be too 
late. It's a product line that makes me 
wonder why anyone would spend six or 
seven hundred dollars for a computer, 
when, for a few hundred more, they 
could get a Macintosh. (Ed. note— A 
512K Macintosh retails for over $2500; 
additional disk drives for the Mac are 
$495. For $3000, one could buy two 
complete Atari 520ST systems.) 

AL: Although, if the Atari ST com- 
puters are really color Macs at one-third 
the cost, then they may have a market. 

NB: At this point, the GEM system 
really isn't as good as MacPaint. It may 
get refined, but there just isn't the care 
and detail there. 

I believe that there is still so much to 
be done with making computers easy to 
use and useful. The Macintosh and the 
GEM system are attempts to make com- 
puting what it should be. It is a step in 
the right direction, but I feel that they 
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Alexander Graham Bear. 




are not really breakthrough products. 

AL: What ivouJd be a breakthrough 
product, and where do we have to go to 
make computers what they should be? 

NB: A couple of things need to hap- 
pen. Since it is a competitive industry, 
I don't want to talk too much about it. 
Part of it is the visual bandwidth, the 
amount of information that can be car- 
ried on a channel or displayed. 

AL: Do you think home computers as 
a market are dead? 

NB: No. They have, in fact, reached a 
level of what I call commodity products. 
These type of products take on certain 
characteristics in the marketplace. The 
ability to innovate to the point of major 
breakthroughs is really in the eye of the 
beholder. 

There is a level of stability in the com- 
puter market where there may only be 
a 1 percent improvement. But I think 
most of the people who want a computer 
have already got one. Of course, there 
will be upgrades and all of that. 

When I think of all of the different 
disk formats and programs and stan- 
dards that exist, I am just appalled. I've 
got Atari software, Apple II software, 
Mac software, IBM software; I just wish 
there were some way to standardize all 
of this stuff. 

AL: The Petster is really kind of a new 
product, a new market. In the robotics 



world, a lot has been said about the fu- 
ture of robots in the home. The notion 
is that, until robotics are brought into 
the home in a natural way, like the way 
you would interact with a pet, the ro- 
botics market will not be realized. Do 
you think things are going to take off 



The ability to 
innovate to the 
point of major 
breakthroughs is 
really in the eye of 
the beholder. 



NB: Let's just say I learned a few things 
at Androbot. You've got to try new 
things. The world is like running down 
a hallway. It is only when you get 90 per- 
cent of the way down the heillway that 
you realize that the real market is off to 
the left. You can look into that room and, 
instead of being a closet, it's a ballroom. 
One of the things that I have always 
tried to do is to stay on the edge and be 
one of the first ones to recognize that 
there is a ballroom at the end of the hall. 
But you have got to get down that hall- 
way in order to find out. And sometimes 



you open the door, and there is a closet 
— or the door doesn't even open. 

Nolan Bushnell has a habit of finding 
those ballrooms at the end of the hall. 
It looks as if Axlon's new products will, 
in fact, just be the beginning of entering 
that ballroom. 

The Petsters will be available in June 
and will cost under $100.00. Each toy 
will have one of 256 different personali- 
ties (breeds?) programmed into it. A.G. 
Bear will be available in May and will 
cost under $50.00. Andy the Robot is 
available now for $119.00 from Axlon, 
P.O. Box 306, 125 Main St., Half Moon 
Bay, CA 94019. 

Thanks, Nolan, for a fascinating dis- 
cussion and, of course, for beginning 
what we all now know as the Atari ad- 
venture. The Atari adventure continues 
next month, right here in ANALOG 
Computing with you, the End User. D 

Arthur Leyenberger is a human fac- 
tors psychologist living in New Jersey. He 
does free-lance writing and microcom- 
puter consulting, and has been an Atari 
enthusiast for over three years. 



The End User 

c/o ANALOG Computing 

P.O. Box 23 
Worcester, MA 01603 
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A 

ATARI' 

S69.95 (Rom) 
$49.95 (D or C) 



Vastly SUPERIOR to any translation programs 

available! FOR ATARI 

1200XL/600XL/800XL with 64K. 

(Pleose specify computer model number!) 



THE 

XL "FIX"I 



A 

ATARI" 

$69.95 (Rom) 
$49.95 (D Of C) 



The Atari XL series computers represent power, sophistication, and 
flexibility virtually unrivalled in todays Home Computer Market. 
With "approximately" 30-40% of existing software being "incom- 
potable", a real, and serious problem exists. Because of this we 
have developed THE XL "FIX"! 
ADVANTAGES over cheaper "translation products": 

1. The XL "FIX"! is capable of fixing more software ... an estimated 
30% more software! 

2. The XL "FIX"! is available in DISK, CASSEHE, and now ROM! 

3. XL "FIX"! versions fix ALL THREE types of sofhvare (Disk - Cassette - 
and Cartridges!) 

4. The XL "FIX"! (disk or cossette) adds OVER 4K of usable RAM to your 
computer (anyone using Data bases or Word processors will really 
appreciate this feature!) 

5. You never hove to hold the OPTION button down on 600XL or 
800XL computers! 

6. VERY IMPORTANT! You need to load the XL "FIX"! only once ... you 
canchange disks, cassettes, or cartridges wittioul rebooting the XL 
"FIX"! each time (disk or cassette)! 

7. The ROM version is instantaneous upon computer power up, has o 
high speed cursor, is instantly svsfltchable to your original operating 
system, will work with 16K 600XL's, and more! 

The XL "FIX"! .... another SUPERIOR product! 64K required! 

DISTRIBUTOR/DEALER inquires welcome 



Mastercard-Visa-Money 
Order or Cashier Check. 
Phone (716) 467-9326 
Please specify computer 
model number! 



Send S49.95 (S69.95 for Rom) 
plus $4 shipping and hondling 
(N.Y.S. residents please add 7%) to: 
COMPUTER SOFTWARE SERVICES 
P.O. Box 17660 
Rochester, New York 14617 



A 

ATARI 

ONLY 

$49.95 



PROTECT your DISK programs and 
files BEFORE lending them out! 

THE 

"PROTECTOR"!'^ 



A 

ATARI 

ONLY 

$49.95 



Includes hardware and software! The "PROTECTOR" 
produces a true BAD SECTOR GENERATOR which will allow you 
to create BAD SECTORS wherever you wish (approximately 10 
per second!). You'll never have to fool with ridiculous speed 
adjustment or tape jerking schemes again! Simple do it 
yourself installation requires 15 to 20 minutes! 

The DISK software is the most versatile that weVe ever seen 
and ifs lightning FAST! Allows you to move and rearrange data 
anywhere on the disk, scrambles directories making them un- 
accessible to others, and offers INSTANT mapping of file disks 
(requires one second for ENTIRE disk!). Simple operation. 

Ail these features are done from a 720 sector FULL VIEW 
map for total operator viewing and simplicity! 

• Multiple drives 

• Digitial SECTOR indicator 

• Directory scrambler 

• Moves/arranges data 

• Selectable read/write 

• Selectable start/end 

• Hex conversion 

• Disk Duping 



' Disk mapping 
■ Instant map 
' Compaction 
' Fast formating 
' Auto-formating 

Bad sector memory 

Instant restart 

Multiple copy function 



DEAUR/DISTRIBUTOR INQUIRIES WELCOME! 

Our other fine products include 
THE "PIIL" and THE <>Sll£NCER". 



Send $49.95 plus $4 shipping 
and handling (N.Y.S. resi- 
dents add 7% sales tax) to: 
COMPUTER SOFTWARE 
SERVICES 
P.O. Box 176«0 
Rochester, New York 14621 
Phone Order: 
(716) 467-9326 



Mastercard-Visa-Money 
Orders or Bank Checks. Atari 
is a TM of Atari Inc. The 
"PROTECTOR" is a TM of 
COMPUTER SOFTWARE 
SERVICES (division of S.C.S.D., 
Inc.) 100% WARRANTY 
(replacement only - no 
refund policy.) 



A 

A'TA Ol ■ '^'-"^ years they said it couldn't be done . 

ONIY 

$149.95 



THE 

IMPOSSIBLE"! 



® they claimed! 



A 

ATARI ■ 



ONLY 



Backup almost any disk currently available (even heavily protected programs) with an UNMODIFIED disk drive! $1 49.95 

Works with ANY disk drive! 
PURPOSE: The "IMPOSSIBLE" was developed in response to the estimated half million disk drive users that own a drive other than the Atari 810 (Indus, Per- 
com, Trak, Rano, Astra, etc.) that wish to BACK UP their protected software. Due to a radically new technology developed by Computer Software Ser- 
vices, modification to your disk drive has been eliminated! The advantages are obvious! Drive warranties ore not violated, the chance accidental 
damage has been eliminated, etc., etc. 

OPERATION: The "IMPOSSIBLE"! consists of a disk program (unprotected so you can make as many backups as you wish) and a 4K STATIC RAM pack 
which isinsertedintoyourcomputer(nosoldering!)The"IMPOSSIBLE"! will read yourprogromdisk and then re-write it in an unprotected form at! You may 
moke additional backup copies using a sector copier or even regular DOS! Because your backup copy no longer has BAD SECTORS or EXOTIC FORMATS, 
the program data con now be manipulated into DOS compatable files (even double density!), transfered to cassette, etc. (with the aid of our Satellite 
programs!) No user programming knowledge required. A few programs require logical thinking. 
FEATURES: 1. Backup protected disks 5. AFSD-Automotic FUZZY Sector Discriminator 

2. Handles most MULTI-LOAD programs 6. Expands computer memory to 52K usable 

3. Makes DOS files (with Satellite option) 7. Simple NO SOLDER installation 

4. Up to 90K data input capable 8. Satellite expandable 

PROJECTED SATELLITES: A "COMPACTOR" program which will convert your program into DOS compatable files (double density compatable!) for the 
storage of several programs on one disk. A"COLUMN 80" program for Word Proccessing, etc. It allows 80 columns on the screen! The "XL-MATE" will allow 
programs madewith your 400/800 "IMPOSSIBLE"! to nowplay on your XL ComputeriTheMETAMORPHOSESII program will allowyoutoconvertyour pro- 
tected CASSETTES into disk DOS files and vice-versa. All satellite programs must be used with inconjunction with The "IMPOSSIBLE"! 
REQUIREMENTS: The "IMPOSSIBLE" diskette, the 4K STATIC RAM pock, a 400 or 800 computer (please specify!) with 48K and "B" Rom's. NOTE! The very old 
ATARI computers were shipped with "A" Rom's which had some serious "Bugs". Even if you don't own an "IMPOSSIBLE," you shou Id upgrade to "B" Rom's 
(simple to install!) We have them available at a very inexpensive price. CALL US! "XL" version available soon! 

NOT A PIRATING TOOL: We at CSS. did not design The "IMPOSSIBLE"! to put Software Manufactures out-of-business overnight! Nearly all of our products 
have been "ripped-off" by industry parasite who have little or no ability to develop a product of their own so we can sympathize with their dilemma. All 
C.S.S. products have built-in safe guards which prohibit their use for flagrant pirating. The "IMPOSSIBLE"! is no exception! While The "IMPOSSIBLE"! back- 
up the most heavily protected programs, it also checks to see that the 4K STATIC RAM pock is installed before allowing the backup copy to 
execute! 

EXAMPLES: The "IMPOSSIBLE"! has been tested on 300 of the most pop- 
ular and heavily protected programs we could find. With nearly 4000 
programs for Atari, we DO NOT guarontfse that it will backup all pro- 
grams in the post-present-and future! We will supply updates at $6 each 
(non-profit!) if and when necessary. Programs we hove successfully 
backed up include: Blue Max, Visi-col, Archon, Mule, File Manager 800 
+, Syn Calc, Syn File, One on One, 7 Cities of Gold, Super Bunny, Load 
Runner, Drol, and Gumboil just to name a tew\ 



Mastercard-Visa-Money 
Orders or Cashier Check. 
Phone: (716) 467-9326 
Please specif/ computer 
nrodel number! 



Send $149.95 plus 

S4 shipping and handling 

(N.Y.S. residents please odd 7%) 

COtyiPUTER SOnWARE SERVICES 
P.O. BOX 17660 
ROCHESTER, N.Y. 14617 
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PANAK 
STRIKES! 



Reviews of 
software 



by Steve Panak 



Since summer is on the way, all but 
the hard-core computer junkies among 
us have forsaken their keyboards, mod- 
ems and floppy disks in favor of svi'im- 
ming holes, baseball and those cool, 
early evening drives with that special 
someone. While the faithful Atari sits 
waiting. 

But, my, doesn't the tune change when 
the blue sky turns dark, and the weath- 
er forces us all indoors for a hot, mug- 
gy afternoon. Let's hope all circuits will 
function when you come back crying for 
something to do, begging to play one of 
these games. 

STEALTH 

by Tracy Lagrone and 
Richard E. Sansom 
BRODERBUND 
17 Paul Drive 
San Rafael, CA 94903 
48K Disk $29.95 

On a dai'k, desolate and doomed plan- 
et, the Council of Nine mercilessly rule 
over all they survey, cruel overlords of 
an alien world. If they have their way, 
their evil will surely spread malignant- 
ly throughout the rest of the populated 
galaxy. You are the only one who can 
stop them. You are the only one who can 
penetrate their forces and topple their 
tower. 

So read the tantalizing paragraphs on 




the carton of Stealth, 
the new game from 
Broderbujid. Unfortu 
nately, this teaser is, in 
reality, a trap for the in- 
attentive, as Stealth is only 
another blast- 'em-up that's a 
good five years behind the 
times. 

In Stealth, you pilot a Stealth 
Starfighter mere feet above the 
barren terrain, avoiding a few sur- 
face blemishes and ample enemy fire as 
you quickly close in on the Dark Tower. 
Upon reaching this, you must knock it 
down with a number of direct hits, one 
for each level of difficulty that you've 
achieved . 

The enemy's tanks, bunkers and scout 
planes fire on you, while radar towers 
track you, lock on and launch missiles. 
On upper levels, volcanoes, both dor- 
mant and active, are added. They threat- 
en to scorch yom- wings, dropping you 
from the sky like a moth who's flown too 
close to a flame. Finally, as if this isn't 
enough, fighter planes attempt to "kami- 
kaze" you from the sky. 

You are constrained by your energy. 



which limits the time you have to fell 
the tower. Floating above the alien land- 
scape are positive and negative energy 
fields which, when flown through, in- 
crease or decrease your energy. Flying 
fast and being hit also use up energy. 
As you may have guessed, when 
your energy reaches zero, you flare 
up in an anti-matter fireball. 

Visually, the game is much like 
a budget Buck Rogers. Your Star- 
fighter is very detailed, but the ene- 
my forces ai-e simple block figures, only 
slightly more sophisticated than the old 
2600's. 

However, all screen objects move rap- 
idly, and your ship in particular controls 
nicely, leaning on turns and jerking if 
hit. The joystick is used for all game 
control except pause, which utilizes the 
space bar. 

Sound is also pretty standai'd stuff, as 
is the high game save feature. This is a 
very conservative and safe game, with 
no surprises. The bottom of the screen 
displays energy, point and time totals, 
as well as distance to the tower, which 
looms on the horizon but never really 
seems to get any closer. 
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I PANAK STRIKES! cominued 



Once you've toppled the tower, it's on 
to the next level for more of the same. 
There are five levels in all, and while 
they do challenge you, there's never any- 
thing new. 




Stealth. 

It is a shame that a game with such 
nice graphics denies you equally fine 
playability. Stealth is fascinating the 
first time around, but you'll tire of it 
quickly. 

BOUNTY BOB STRIKES BACK 

by Bill Hogue and Curtis Mikolyski 

BIG FIVE SOFTWARE 

P.O. Box 9078-185 

Van Nuys, CA 91409 

40K Cartridge $49.95 

In case you haven't noticed (and I'm 
sure you have), video games seem to 
have reached a level of stagnation that's 
equaled only by network TV program- 
ming. The same old ideas, concepts and 
themes winding through disks and car- 
tridges a year or two ago continue to 
crop up this year (and, no doubt, next 
year, ad infinitum). But it's not similar- 
ity that dooms these games, it's lack of 
quality. 

I say this because any theme can be 
bettered, made more exciting or more 
colorful. Well, unlike the "new and im- 
proved" plastering the laundry detergent 
boxes on the grocer's shelves, Bounty 
Bob Strikes Back lives up to its claims. 

Bounty Bob is a follow-up adventure 
to Miner 2049er, although this fact isn't 
overly evident from the packaging. In- 
deed, the only way one might realize 
that Bob is a sequel is by recognizing the 
similarity between the games or by care- 
fully reading the box. Thus, Bob does 
not rely on a past glory to pull its load. 
After popping in the cartridge, you'll 
quickly find out that Bob needs no help. 

For those familiar with Bob or Miner 
2049er, these games are basically vari- 
ations on the Donkey Kong theme, with 
a sprinkling of Pac-Man [what game 



now doesn't have at least a pinch of Pac- 
Man?) 

In Bob, you move through a maze — 
set undergromid in a vast cave — collect- 
ing points and avoiding mutants. Touch- 
ing artifacts will power you up to kill 
mutants. Once all of the territory in one 
screen has been covered , you move on 
to the next, but what's really unusual is 
that there are twenty-five screens in all. 

It is this vai'iety which saves Bob from 
mediocrity. There are ladders and slides, 
elevators and cannons, and my favorite 
— suction tubes. In addition, acid rain 
dripping from the ceiling lends a danger 
reminiscent of Space Invaders (remem- 
ber that one?) 

Each screen is difficult, and getting 
through them all takes quite a while. 
Note: this is an optimisfic statement. 




Bounty Bob Strikes Back. 

The standard features are present: 
pause key, high score screen, one or two 
players. But a couple of special features 
add to the uniqueness of Bob. 

The first is the option screen, which 
allows you to control (within certain 
parameters) various conditions of the 
game, such as number of lives per game, 
when the extra life is awarded, and, 
most importantly, if the secret messages 
are to be displayed. 

These secret messages tell you how 
to warp through levels, jumping them 
three at a time. This lets you play the 
higher levels without wasting hours (and 
lives — we all get careless] on the inter- 
mediate ones that you've already mas- 
tered. At the same time, you must work 
to progress, since these messages are 
only shown when you've earned them. 

The graphics are not spectacular, but 
they're not disappointing either, simply 
average. Screen movement is quick, but 
one would expect that from a cartridge. 
Sound is good, and its volume can be 
varied with the option screen, as well 
as with the monitor volume dial. 



Disappointments: not enough flexibil- 
ity on the option screen, although it is 
possible that more flexibility (lives, per- 
haps) would decrease difficulty and 
hence decrease value — Bob relies on the 
expectation and elation of a new board 
to fuel the fires of interest. 

Big complaint: the high score screen. 
While a nice bit of animation occurs (lit- 
tle bulldozers push letters that fall to 
form your name; little birds pick up the 
score and letters, rearranging the high 
score table), this takes time. . .too much 
time, and it cannot be bypassed if two 
play. Since this is a cartridge, and the 
scores survive only as long as the pow- 
er, the high score save is a waste. 

I'm hard to please — a critic has to be 
— but I liked Bob. . .1 played Bob and, 
maybe most importantly, I was angry 
when I couldn't beat Bob. 

So get your miner's helmet, pick and 
shovel, and get ready to dig this game. 

CONAN 

by Eric Robinson and Eric Parker 

DATASOFT 

19808 Nordhoff Place 

Chatsworth, CA 91311 

48K Disk $34.95 

It seems that, when designers are real- 
ly starved for ideas, they come up with 
something truly original — like a sequel 
or maybe "an all new game inspired by 
a not-too-great movie." 

By that remark, you may think I've 
tipped my hand as to how I feel about 
the Conan game. Well, you're right. 




Conan. 

Perhaps old Arnold just doesn't make 
much cash from pumping iron any more 
(or maybe he's laughing at all of us), but 
it seems he's not too particular about 
where he places his likeness. I'm sure 
that if he knew about this, he would 
mutter a few gutteral sounds and ter- 
minate those in charge. 

Conan the video game is really not 
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like anything I've seen before; for this, 
we can be eternally thankful. 

The play is simple: you use the joy- 
stick to control a little musclebound (it's 
amazing what you can do with high-res 
graphics) figure. You move him through 
castles and caves, swamps and sewers, 
searching for gems and keys. Using the 
button, you launch his mighty sword to 
make mincemeat out of bats and float- 
ing eyeballs and a whole host of other 
uglies. 

The graphics are good and highly de- 
tailed (however, at no time do the bleep 
muscles quiver). There are also good 
sound effects, and fortunately for all of 
us, the background music can be toggled 
off with the S key. 

The problem is one of control. The 
game depends a lot on jumping — Conan 
jumps over creatures; Conan jumps over 
crevices; Conan jumps over everything, 
spinning through the air in a prehistoric 
tuck and roll. 

The trouble is that jumping requires 



a diagonal command from the joystick, 
and we all know how hard that is to do. 
So, rather than jumping, most of the 
time Conan dissolves atop a scorpion, 
while you wrestle with the joystick. 

Throwing the sword is also hard to get 
used to, but is easily mastered — it's just 
a matter of timing. 

That's really about it; you run around 
until you're done. I found little excite- 
ment. In fact, I found Conan to be a 
bore, but boredom wasn't the only insult 
I suffered. 

The game crashes. Irrecoverably and 
frequently. You'll suddenly find yourself 
unable to move, either stuck to the side 
of the screen or against a tree or wall. 
No amount of begging will release you. 
The only way to continue is to commit 
hari-kari with the sword. 

Actually, the only way to save face is 
to end it all by immersing the disk in a 
bucket of warm sake. Playing Conan is 
truly barbaric, both to your computer 
and to your intelligence. 



That about wraps it up for this time. 
Now go outside and enjoy the good 
weather. I'll be waiting patiently for the 
next rainy day. D 

The author wishes to thank Perfect 
Computers ofNiles, Ohio for valuable as- 
sistance in the preparation of this 
article. 

Steve Panak is a banking computer 
operator and free-lance writer living in 
northeastern Ohio. He holds a B. S. in 
B.A. and currently attends law school, 
where he develops software to teach 
complex legel concepts. In his spare 
time, he enjoys computer games. 



WHITE HOUSE 

^^/^^ J7 ^ A £f A% HOURS: Monday - Friday 9 am - 6:00 pm 



We carry a full line for the Atari, Apple & C-64. 

(717) 322-7700 



VISA& MC 
Accepted 4% 




I DISK DRIVES 

m Atari 

i Indus GT 215.00 

m. 1050 169.95 

i Commodore 

i Indus GT 239.00 

ii 1541 235.00 

ilMSD Drives 

i Single MSD 1 309.00 

i;Dual MSD 2 485,00 

ilBlue Chip 

s| 100% Compatible 

i|iC-64 Disk Drive 

ii Double Density 225.00 

I DISKETTES 

iSKC 

i|sS/SD 1 1.95 

isS/DD 14.95 

iiOS/DD 16,95 

II Maxell 

|i:MD-1 18,95 

liMD-2 23.95 

II Elephant 

||SS/SD 14,95 

iiisS/DD 16.95 

IIdS/DD 21.95 

11 Innovative 
il Concepts 

ilFlip-NFile (10) 3,95 

ilFlip-N-File (15) 8 95 

ilFlip-NFile (25) 18,95 

:;^:i:i w/lock 

iiFlip-N-File (50) 17 95 

III Flip-NFile (50) 23,95 

::|:|^ W/Iock 

ill Flip-NFile 17,95 

;p ROM Holder 

Ask About Phone Rebates! 



.16,95 
.21,95 
. 13.95 

,45 00 



..59,00 
,.32,95 
, 137.95 
. 137,95 



Koala 

Atari & C-64 

Koala Pads 49,95 

WICO 

Bat Handler Joy Stick 

3-Way Deluxe 

Boss 

SOFTWARE 

1010 Recorders 

Atari Key Pads 29,00 

Atari Writer 39,95 

Batteries Included 

Paper Clip w/Spell PK . . , 69,95 

Paper Clip 

Home Pack 

Bus Card 

Bl 80 Board 

Broderbund 

Atari 

Print Sliop 31,95 

Bank Street Writer 39,95 

Spelunker 21 95 

Stealth 21 95 

Loderunner 22,95 

C-64 

Print strop 31,95 

Bank Street Writer 37,95 

Spelunker 21.75 

Stealtti 21,75 

Loderunner 22,95 

INTERFACES 

MRP 1150 64.95 

Uprint N Port 59.00 

Apple Dumpling GX 65.00 

MPP 1152 Butter Kit 19,95 

Atari 850 115.95 

Cardco B 35.95 

CardcoG 59.95 

Micro Stutter 64K Printer 
Butter 105,00 



PRINTERS 

Star Micronics 

SG10 225,00 

SG15 389.00 

SD10 355.00 

SD15 465,00 

BRIO 495,00 

SR15 590,00 

Powerlype 309.00 

Legend 

B80 220.00 

1080 240.00 

1200 250.00 

Atari 

1020 59.00 

1025 189.00 

1027 239.00 

Commodore 

1526 259.00 

Juki 

6100 379.00 

Blue Chip 

M12010 C-64 259.00 

Epson Printer 

RX 80 219.00 

RX80FT 259.00 

RX 10O 369. OO 

FX 80 385.00 

FX 100 555.00 

JX 80 529. OO 

LQ 1500 P 1089.00 

LO 1 50O S 11 49.00 

Cardco Printer 

LQ-1 379.00 

LQ-3 289.00 

(Witt! Atari/Commodore Interface) 

DUST COVERS 
PRINTER RIBBONS 
PRINTING PAPER 



C. Itoh Printers 

8510 A 285,00 

8510 BC2 389.00 

8510 BP1 339.00 

8510 SP 389.00 

8510 SR 429.00 

8510 SCP 459.00 

8510 SCR 489.00 

1550 BCD 529.00 

1550 P 485.00 

A10-20P 465.00 

FlO-40 P/S 875.00 

F10-55 P/S 1059.00 

FIO Tractor 169.00 

F10 Stieet Feeder ...349.00 

Okidata Printer 

1-82 229.00 

83 545.00 

84 645.00 

92 349.00 

93 565.00 

image Writer 425.00 

Oklmate 10 179.00 

Mannseman Tally 

Spirit 80 249.00 

MT 160L 495.00 

Mt 180L 595.00 

Panasonic 

1090 199. OO 

1091 265.00 

1092 399. OO 

1093 599.00 

3151 475.00 



MODEMS 



^^^^^ 



MPP 1000E 
89.95 

Mlgtity Mo 

w/So(tware 79.95 

Telecommunications . . . 69.95 

Westrldge 79.95 

Hayes 300 199.00 

Hayes 1200 469.00 

Apple Catti 265.00 

CompuServe 24.95 

MONITORS 

Zenith 

122 85.95 

123 75.95 

NEC 

1201 Green 139.95 

1205 Amber 139.95 

1260 Green 97.00 

Amdek 

300 Green 135.00 

300 Amber 145.00 

Color 300 250.00 

Teknika 

MJ-IO Composit S 

Separate Video 235.00 

MJ-22 RGG Composite & 
Separate Video 289.00 

Dealers Inquiries 
Invited 



POLICY: No deposit en COD orders. FREE f reighit on all pre- 
paid cash orders over $300 in the continental USA, APO S 
FPO add $5 per hundred. For priority mail add $8 per 
hundred. PA residents add 6% sales tax. Defective products 
must have Prior RA number. Schools net 15. 
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I •! V POWER WITHOUT THE PRICE 
' ATARf AT. . .COMPUTER CREATIONS 



ATARI HARDWARE 
COMPUTERS 

Atari 800 XL CALL 

Atari 65 XE FOR NEW 

Atari 130 XE PRICES 



COMPUTERS 

Atari 130 ST 

Atari 520 ST 



DISK DRIVES 



Atari 1050 

Indus GT (Free Software) . 

Astra 2001 

Astra "Big D" 



CALL 

FOR 

NEW 

PRICES 



. . Atari SF 324 (3'A" floppy disk 250K) 

, , Atari SF 354 (S'/j" floppy disk 500K) 

Atari SH 317 (3'/!" hard disk lOI^B) 

Happy Eniiancement for Atari 

810 and 1 050 Drives 



: 



PRINTERS 

Atari XTM 201 (Non-impact 
Dot Matrix 20 CPS) 

Atari XTC 201 (Color, non- 
impact Dot Matrix 
20 CPS) 

Atari XDM 1 2 1 (Daisy Wlieel 
Letter Quality 12 CPS) CALL 

Atari XMI»1 801 (Dot Matrix, 
Impact 80 CPS) FOR 

Atari 1026 (Dot Matrix, Impact 
CPS) NEW 

Atari 1027 (Letter Quality) ... 

Atari ST 504 (Color Dot Matrix, PRICES 
non-impact 50 CPS) 

EPSON PRINTERS 

LX-80 (80 column) Call For 

LX-80 Tractor Feed Printer i 

Epson FX-80-1- (80 column) . . . Interface 
Epson RX 100-1- (135 col.).... Packages 

STAR MICRONICS PRINTERS 

SG-10 (80 column) 

SG-15 (136 column) CALL 

SD-10 (80 column) FOR 

SD-1 5 (136 column) PRICES 

SR-10 (80 column) 

' SR-15 (136 column) 

SB-10 

Powertype Daisywheel 

Powertype Tractor Feed 

PANASONIC PRINTERS 

KX-1090 Call 

KX-1091 For 

KX-1092 Prices 

LO-3151 

Okimate 10 plus plug n' print 

PRINTER INTERFACE CABLES 

MPP-llitic.-oprint 49 

MPP-1150 Parallel Printer 

Interlace 65 

U-PrintA 75 

A-1 6 Interface/Buffer 99 

APE Face XLP 65 

APE Face 12XLP 75 

Microbits Microstuffer 1 09 

PRINTER RIBBONS 

Gemini Printers (Black/Blue/ 

Red/Purple/Brn./Grn.) 5 

Epson Printers 8 

Panasonic Printers, Black 10 

Panasonic Printers, Color 13 



MONITORS 

Atari XC 141 (14" Composite 

Color) 

Atari XM 148(12" CALL 

Monociirome, 80 column, FOR 

low resolution) PRICES 

Atari SM 124(12" 

Monocfirome, 80 column, 

iiigh resolution) 

Atari SC 1 224 (1 2" RGB Color) 

Sanyo 12" Green Screen 79 

Sanyo 1 2" Amber Screen 79 

Sanyo Color Screen, 13" 209 

Sanyo 9" Green Screen 89 

Monitor Cable 7 

Teknika 1 3" Color MJ 1 209 

MODEMS 

Atari 1030 Direct 300 Band 

Connect CALL 

Atari XM 301 Direct FOR 

Connect 300 Band PRICES 

MPP-1000E Modem 109 

Signalman Mark XII Modem witii 

R-Verter 299 

Mark X with R-Verter 1 69 

CompuServe Starter Kit 24 

UPGRADES/ 
ACCESSORIES/BOOKS 

ACCESSORIES 

Flipn' File 10 4 

Flipn' File 15 7 

Original Flip n' File 50 14 

Flipn' File Cart Case 12 

Library Cases (1 colors) 4 

Disk Bank/5 (Holds 50) 12 

Disk Bank (Holds 10) 5 

Power Strip (6 outlet) 16 

Lineguard Spike Suppressor ... . 13 

Disk Drive Cleaning Kit 13 

MicroMate Paper 

(20#, 540 sheets.) 10 

Computer Paper 

(15#, 3200 sheets.) 30 

Printer Stand (wire) 16 

Dust Covers Call for availability 

UPGRADES: 

Ram Rod X/L W/Omnimon 99 

Omniviewfor 800 XL 49 

B.I. 80 Column Adaptor Call 

U.S. Doubler 65 

MPP64K 69 

BOOKS: 

Lg. selection of titles avail Call 




GENERIC DISKS AT FANTASTIC PRICES.' "~ 

SS/DO GENERIC DISKS AS LOW AS 99$ ea. 

Generic 100% Defect-Free/Guaranteed. 

Includes sleeves, labels, write protect tabs, reinforced hub rings, lifetime 
warranty. (2 boxes minimum) 



DISKETTES 2 boxes 

(2 bx. minimum) 3- 6 boxes 

10 per box 7 -10 boxes 

MORE THAN 1 BOXES . 



SS/DD 
$1 1 .99 
$10.99 
$ 9.99 
, CALL! 



DS/DD 
$13.99 
$12.99 
$11.99 



• • DEALER INQUIRIES INVITED • • 



COMPLETE LINE OF ATARI SOFTWARE 



SOFTWARE 

EPYX 

Dragonriders of Pern (D) 28 

Summer Games 28 

Pitstop 11(D) 28 

Ballblazer(D) 28 

Rescue on Fractalus (D) 28 

Temple of Apshal (D) 25 

ACCESS 

Beach Head (D) 24 

Beach Head II (D) 24 

Raid Over Moscow (D) 28 

ACTIVISION 

Decathalon(B) 21 

Pitfall II (R) 21 

Space Shuttle (R) 21 

Ghost Busters (D) 24 

AMERICAN EDUCATIONAL 

Spelling Grades 2 thru 8 (D) . . . . 15 
Reading Comprehension (D) 19 

BATTERIES INCLUDED 

Paperclip (D) 59 

Homepak 35 

B/Graph Call 

BRODERBUND Home Pak 

Printship (D) 32 

Spelunker(D) 21 

Stealth (D) 21 

Whistler's Brother (D) 21 

CBS 

Call for items and prices 

CONTINENTAL 

Home Accountant (D) 50 

DATASOFT 

Bruce Lee 24 

Dallas Quest 24 

Conan 28 

Letter Wizard w/speller Call 

ELECTRONIC ARTS 

Archon(D) 29 

Pinball Construction (D) 29 

M.U.L.E. (D) 29 

Murder/Zinderneuf (D) 29 

One on One (D) 29 

Archon 11(D) 29 

Music Construction (D) 29 

Realm/Impossibility (D) 29 

Hard Hat Mack 25 

AXIS Assasin 25 

Seven Cities of Gold 29 

Adventure Construction Set 29 

Cut and Paste 37 



INFOCOM 

Cut Throats (D) 24 

Deadline (D) 32 

Enchanter (D) 34 

Hitchhiker's Guide to 

the Galaxy (D) 24 

Infidel (D) 28 

Planetfall(D) 24 

Sea Stalker (D) 24 

Sorcerer (D) 28 

Starcross(D) 32 

Suspect (D) 32 

Suspended (D) 32 

Witness (D) 24 

Zorkl(D) 24 

Zorkllorlll(D) 28 

Invisiclues Hint Books 7 

MICROPROSE 

F-1 5 Strike Eagle (D) 24 

Mlg Alley Ace (D) 24 

Solo Flight (D) 24 

OSS 

Action (R) 68 

Action Tool Kit (D) 28 

Basic XL (R) 68 

DOS XL (D) 28 

MAC/66 (R) 68 

MAC/65 Tool Kit (D) 28 

Writer's Tool Kit 68 

ORIGIN 

Ultima III (D) 42 

SCARBOROUGH 

Masterlype 28 

Net Worth 52 

SIERRA ON LINE 

Ultima I 26 

Ultima II 42 

SPINNAKER 

Call for items and prices 

SYNAPSE 

Quasimodo 18 

Alley Cat 18 

Syn-Flle-H 38 

Syn-Calc 38 

Syn-Trend 28 

Syn-Comm 28 

Syn-Stock 28 

Mindwheel Call 

Essex Call 

TRONIX 

S.A.M 42 

Chatterbee 28 



To order call TOLL FREE 

1-800-824-7506 



' No extra charge 

for IvIasterCard 

or Visa 



ORDER LINE ONLY 



COMPUTER CREATIONS, Inc. 

P.O. Bo 292467 - Dayton, Ohio 45429 

For information call: (513) 294-2002 (Or to order in Ohio) 



Order Lines Open 8:30 a.m. to 8:00 pm. Mon.-Fri.; 1 a.m. to 4:00 p.m. Sat. (Eastern Standard Time). Minimum $1 per order. C.O.D. (add $3.00). Call toll free number to verify 
pricesand availability of product Hardware requires additional freight charges. Software and accessories add $3.00shipping and handling in Continental United States Actual 
freight will bechargedoutside U.S. tolncludeCanada, Alaska, Hawaii, PuertoRico.Ohioresidentsadd 6% salestax. Free shipping on prepaidcash orders within theContinental 
U.S. Forimmediatedeliverysend cashier's check, money orderordirectbanktransfers. Personal andcompanychecksallow3weekstoclear. School purchase orders welcome 
Due to our low prices, all sales are final. NOCREDITS. All defective returns must have a return authorization number. Please call (5 1 3) 294-2002 to obtain an RA# or your return 
will not be accepted for replacement or repair. 
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UTILITY 



Q 




by Philip Altman 



This article is about a new han- 
dler, V:, which turns unused mem 
ory into a working storage device. 
V: is used in much the same way as 
the cassette or disk storage devices 
you're familiar with, but unlike these, V: is volatile — 
its contents disappear when the computer is turned 
off. 

You can LIST or SAVE a program to V: and later 
retrieve it with ENTER or LOAD. Since V: resides 
entirely in memory, data transfer is almost instanta- 
neous. Using V: instead of a disk also saves wear and 
tear on the drive. 

The capacity of V: depends on the amount of free 
RAM in your system and on the size of the program 
currently in memory. V: is especially useful for tem- 
porary storage of programs and for merging program 
data. You can also use V: to clear a cluttered varia- 
ble name table. 

V: works with all Atari computers, with the BA- 
SIC and Assembler/Editor cartridges, and with most 
programs that access devices in the standard way. 

System considerations. 

V: is written entirely in machine language and fits 
in page 6 ($600-6FF] with room to spare. It loads 
as a binary object file from the DOS utilities menu 
with option L. It is SYSTEM RESET-proof and re- 



memory 
storage 
device 



mains accessible until the computer is turned off. V: 
uses no addresses outside page 6, other than $CB and 
$CC (203,204), which are used temporarily. 

Using V. 

V: is entered from BASIC with Listing 1. After en- 
tering the program, check it and save it to a DOS 2.0 
disk in drive 1. Now type RUN. A binary file, called 
Dl:V.OBJ, will be created. When the READY prompt 
returns, type DOS and use option L. to load V.OBJ. 
Now return to BASIC. 

Let's try some simple examples. After typing NEW, 
enter the following short program: 10 PRINT "V: 
WORKS.'":G.10. Now save the program to V: by typ- 
ing SAVE "V: ". Clear the program and verify that it's 
gone by trying to list it. Now enter RUN "V:" and 
watch what happens. Stop execution by hitting the 
BREAK key. List the program and note that it has 
reappeared intact. 

Next, let's try merging program data. Load any BA- 
SIC program. Now, move a block of lines to V: with 
LIST "V", start line, end line<CR> . Erase the pro- 
gram with NEW and enter or load another program. 
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V: 



continued 



Type ENTER "V:" and note that the stored lines 
have been merged with the current program. Pre- 
existing Unes with the same hne numbers are over- 
written, while new lines are inserted in their appro- 
priate positions. This also works with the Assembler/ 
Editor if the ,M option is used. 

Clearing the variable name table of unused varia- 
ble names is also easy. Just list the program to V:, 
type NEW, and enter it again from V:. Cassette users 
will really notice the marked improvement in speed. 

Limitations. 

V: saves data in memory in reverse order, begin- 
ning at the highest free address and progressing 
downwards. Programs, on the other hand, expand 
upwards in memory as they grow. So, as long as a 
program isn't too large relative to yom' system's mem- 
ory capacity, a gap of free memory should always re- 
main between a program and any data stored in V:. 
If there is any overlap, the results will be strange. 

Note, also, that V: ignores filenames, so each time 
you use it to store data, previously stored informa- 



Attention 
Programmers! 

ANALOG Computing is interested in programs, 
articles, and software review subnnissions dealing 
with the Atari home computers. If you feel that you 
can write as well as you can program, then submit 
those articles and reviews that have been floating 
around in your head, awaiting publication. This is 
your opportunity to share your knowledge with the 
growing family of Atari computer owners. 

All submissions for publication must be typed, 
upper and lower case with double spacing. Pro- 
gram listings should be provided in printed form, 
and on cassette or disk. By submitting articles to 
ANALOG Computing, authors acknowledge that 
such materials, upon acceptance for publication, 
become the exclusive property of ANALOG Com- 
puting. If not accepted for publication, the articles 
and/or programs will remain the property of the au- 
thor If submissions are to be returned, please sup- 
ply a self-addressed, stamped envelope. All 
submissions of any kind must be accompanied by 
the author's full address and telephone number 
Send programs to: 
Editor, ANALOG Computing 
P.O. Box 23, Worcester, MA 01603. 



fion is effectively erased. Because V: stores data be- 
ginning just below the display list, switching graphics 
modes is also likely to destroy any information in V:. 

However, V: can still be used within a graphics 
mode, although its capacity will be significantly less 
in the higher resolution modes, since screen RAM 
is larger. In most cases, especially with a 48K sys- 
tem, you should be able to load the DUP.SYS utili- 
ties while a program is stored in V:, so long as V:'s 
boundary does not descend below the end of DUP. 
SYS ($3306-13062). 

You can check V:'s lower limit at any time with 
PEEK(1538] + 256 * PEEK(1539) . If you use V: in this 
way, incidentally, you won't need a MEM.SAV file 
to preserve your program. Just retrieve it from V: af- 
ter returning to BASIC. But don't try to use any of 
the DOS copy functions. These will almost certainly 
clobber anything stored in V:. D 

PhiJip AJtman, M. D. is a physician specializing 
in pathoJogy. He has been programming Atari com- 
puters for over three years and is interested in ma- 
chine language and utihty programs. He has 
authored several articles for ANALOG Computing. 



Listing 1. 
BASIC listing. 

1 REM ==-~--=-::=======z:= 

t REM U: A Menoru Device 

3 HEM ------------------ 

4 REM 

5 REM bv Philip AltHan 

6 REM 

7 REM THIS PROGRAM CREATES A BINARY 

8 REM FILE CO:V.OBJ) HHICH LOADS AND 
3 REM RUNS THE U: HANDLER 

10 OPEN «1,8,0,"D:U.0BJ" 

H PUT 111,255: PUT ttl,255:PUT 111, 4 

12 PUT ttl,6:PUT 1*1,203: PUT til, 6 

13 TRAP 15:F0R 1=1 TO 1000 

14 READ D:PUT ttl,D:NEMT I 

15 PUT ttl,224:PUT ttl,2:PUT ttl,225 

16 PUT ttl,2:PUT ttl,10:PUT ttl,6:END 

17 DATA 32,0,0,76,40,6,165 

18 DATA 12,141,5,6,165,13,141 

19 DATA 6,6,169,4,133,12,169 

20 DATA 6,133,13,173,229,2,141 

21 DATA 2,6,173,230,2,141,3 

22 DATA 6,160,253,200,200,200,185 

23 DATA 26,3,208,248,169,86,153 

24 DATA 26,3,169,66,153,27,3 

25 DATA 169,6,153,28,3,96,80 

26 DATA 6,106,6,126,6,166,6 

27 DATA 79,6,79,6,160,1,96 

28 DATA 165,42,201,8,240,4,201 

29 DATA 4,208,245,173,230,2,141 

30 DATA 1,6,174,229,2,142,0 

31 DATA 6,165,145,208,85,165,42 

32 DATA 201,4,240,221,173,0,6 

33 DATA 141,2,6,173,1,6,141 

34 DATA 3,6,208,207,174,0,6 

35 DATA 134,203,174,1,6,134,204 

36 DATA 160,0,177,203,164,203,208 



PAGE 72 /JUNE 1985 



ANALOG COMPUTING 



37 DATA 3,206,1,6,206,0,6 

38 DATA 174,3,6,236,1,6,144 

39 DATA 175,204,2,6,208,170,160 

40 DATA 136,96,174,1,6,134,204 

41 DATA 174,0,6,134,203,160,0 

42 DATA 145,203,138,208,3,206,1 

43 DATA 6,206,0,6,165,145,205 

44 DATA 1,6,144,137,228,144,176 

45 DATA 133,160,147,96 



CHECKSUM DATA. 

(see page 13] 

1 DATA 183,98,187,993,204,997,902,952, 

776 ,7,4, 952 , 280 , 550 , 49 , 7134 

16 DATA 117,862,121,350,332,23,616,645 

,327,356,38,915, 387 ,614,38, 5741 

31 DATA 612,116,38,55,607,651,7,78,645 

,389,125,615,150,641,751,5480 



LDHAND 
LOOP 



LDY »»FD ISRCH HflNDLR TBL 

INY IFOR ZERO BYTE 

INV ISKIP 3 BYTES 

INY (EACH TIME 

LDA HflTflBS.Y 

BNE LOOP !BR UNTIL FOUND 

LDft »' V ! INSERT "V: " 

BTA HATABS.Y I 8c HANDLER ADRS 

LDA tt <HNDTBL 

8TA HATABS+l-Y 

LDA » >HNDTBL 

STA HATABS+2,Y 

RTS S RETURN TO OS 



V HANDLER ADDRESS TABLE 



.WORD VQPEN-l I OPEN 

.WORD VCLOSE-l I CLOSE 

.WORD VSET-1 I GET BYTE 

.WORD VPUT-1 (PUT BYTE 

.WORD VSTAT-l I STATUS 

-WORD VSPEC-1 18PECIAL 



SUCCESS 

VSTAT 

VSFEC 

! 

VOPEN 



LDY (tl 
RTS 



I RET GOOD STAT 
!NOT IMPLEMENTED 



A Mamarv 



I 

l» by Philip Altman » 
I 

IThlm program craatBS 

la dynamic storaga ciavica 

I lU: 1 in RAM 

I 

I --»«■-----■= 
)0S EQUATES 

I 

DOSINI - *ec )DISK BOOT INIT 

ICftXlZ " »2A le PAGE AUX BYTE 
MEMTOP - •90 iBASIC TOP MEM 
HIMEM - »02E5 ) OS TOP MEMORY 
HATABS » »a3lA iOS HANDLER TBL 
I 

I— ""-"--•- 
I IOCS EQUATES 

I 

OPNRD = •at I READ 
OPNWRT " »0S IWRITE 
I 

ICIO ERROR CODES 

|. ...... ........ 

; 

MEMFUL . »93 1 MEMORY FULL ERR 

EOFERR . «8B iEOF ERROR 

I 

............... 

la-PAGE EQUATES 

I 

ZEROPQ - •CB 
I 

•. (0600 
I 

I............... 

! PROGRAM STORAGE 

I 

PTR •" »*2 INEXT FREE ADRS 

EOF ». #+2 iEDF POINTER 

I 

|. ....... ..-.».. 

IWARMSTART ENTRY 
|. ...... ......s> 

> 

WARMST JSR ♦-» ;INIT DISK 

JMP LDHAND (LOAD HANDLER 
I 



LDA ICAXIZ IBET AUX BYTE 

CMP »OPNWRT |?WRITE 

BEQ OPN 

CMP »DPNRD (MUST BE READ 

BNE USPEC lELSE ERROR 

LDA HIMEM-H (INIT PTR TO 

STA PTR-H (LAST FREE ADRS 

LDX HIMEM 

ETX PTR 

LDA MEMTOP+1 ( 7FREE MEM LEFT 

BNE TSTPTR ! BR ALWAYS 

LDA ICAXIZ (GET MODE 

CMP KOPNRD [7READ 

BEQ SUCCESS (BR IF 90 

LDA PTR (WAS WRITE 

STA EOF [SO MARK EOF 

LDA PTR+1 

STA EOF+1 

BNE SUCCESS [BR ALWAYS 

LDX PTR [MOVE INDEX 

STX ZEROPG [TO PAGE ZERO 

LDX PTR+1 

STX ZEROPG+l 

LDY »0 

LDA (ZEROPQ), Y (GET BYTE 

LDY ZEROPG 

BNE LOl 

DEC PTR-M (BUMP PNTR DOWN 

DEC PTR 

LDX EOF+l 

CPX PTR+1 

BCC SUCCESS 

CPY EOF 

BNE SUCCESS (OK IF PTR>EOF 

LDY »EOFERR (ELSE EOF ERROR 

RTS 



I? AT EOF 



VPUT 


LDX 


PTR+1 


(MOVE INDEX 




STX 


ZEROPB+1 


( TO PAGE ZERO 




LDX 


PTR 






STX 


ZEROPG 






LDY 


It0 






STA 


(ZEROPG) 


,Y (PUT BYTE 




TXA 




SDECR INDEX 




BNE 


LO 






DEC 


PTR+1 




LO 


DEC 


PTR 






LDA 


MEMTOP+1 




TBTPTR 


CMP 


PTR+1 


(7R00M FOR 




BCC 


SUCCESS 


(MORE DATA 




CPX 


MEMTOP 


1 OK. IF PTR >. 



BCS SUCCESS (MEMTOP 

LDY #MEMFUL (ELSE NO RAM 



COLDSTART ENTRY 



*' «0ZE0 
.WORD COLOST 



(COLDSTART ENTRY 



LDA DOSINI (MOVE OLD 

STA WARMST+1 (DOSINI TO 

LDA DOBINI+l [WARMST 

STA WARMST+2 

LDA » <WARMST [POINT DOSINI 

BTA DOSINI (TO WARMST 

LDA « >WARMST 

STA DOSINI+1 

LDA HIMEM (INIT EOF PTR 

BTA EOF 

LDA HIMEM+1 

STA EOF+I 



( INSERT V: HANDLER 



Attention XL Owners! 

TwoGun (issue number 28) requires the following two-line addi- 
tion to work properly on the XL computers: 

71 IF PAS5=2 AND LINE=1360 AND X=69 TH 
EN BVTE=95 

72 IF PASS=2 AND LINE=136e AND X=71 TH 
EN BYTE=228 

Simply add these lines to the BASIC program and reRUN it. 
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Although the Atari does have a "clock" built in, 
it's not easily accessible to the user. What's more, 
the time isn't displayed on the screen. I foimd this 
too much of an inconvenience to live with , espe- 
cially since the Atari can display the clock in a 
a rather novel way. Wherefore, the Atari Clock. 
To set up a real-time clock, we must have an 
accurate way to measure time. One of the only 
events that takes place punctually on the Atari 
is the Immediate Vertical Blank Interrupt (VBI]. 
To read up on it, I suggest De Re Atari from 
APX or Mapping the Atari from COMPUTE! 
Books. 

We must use the Immediate VBI because 
the Deferred VBI is locked out during I/O. 
In fact the Atari Clock doesn't display the 
time during critical I/O (as checked by 
CRITIC at 66 [$42]). 

As I said, the VBI is pretty punctual. 
It occurs about sixty times per second, 
but not quite; it's a couple of millisec- 
onds off. The Clock compensates for this 
loss by adjusting the time about every 
thirteen seconds. 

Note: those not on U.S. standard TV 
(i.e., PAL] can't use this program with- 
out modification, because the VBI oc- 
curs at a different interval. 

Now that we have a way to calculate 



PAGE 74 /JUNE 1985 



ANALOG COMPUTING 



UTILITY 



Q 



ATARI 

CLOCK 



the time, we must find a way to display it. My re- 
quirements were: [1) that the Clock should not go 
away because of graphics calls, SYSTEM RESETs or 
I/O; and (2) that it shouldn't take up any user screen 
area. 

What?! How can you display something on the TV 
or monitor without using the screen? Certainly, you 
couldn't do it on an Apple or even a Commodore 64. 
The Atari, however, with its advanced display chips, 
is quite capable of performing this operation with 
relative ease. 

So how do we do it? 

Have you ever noticed that there's quite a bit of 
blank area before the actual screen starts? The pur- 
pose of this was to compensate for the TV overscan 
(when the TV crops off the left, right, top or bottom 
of the picture). Perhaps this is a little bit too much 
compensation, for I've never run across a TV with 
this much overscan (although it's conceivable that 
some have it). 

I took eight of the twenty-four blank scan lines and 
subverted them into one graphics Une (note that, 
by following the same principle, you can get 320x200 
in graphics 24). The Clock is displayed on this line 
on the top of the screen. 

Getting tlie Clock up and running. 

There are three program listings accompanying 
this article. One is the source code for the Clock, 
created with the OSS MAC/65 Assembler. It's in- 
tended to help you learn about the program and as- 
sembly language. 

ANALOG COMPUTING 



You don't have to type it in — although if you own 
the Assembler, you may do so, assemble to disk with 
the filename AUTORUN.SYS and eliminate typing 
in CLOCK CREATE. It's up to you. 

Assuming you didn't use the assembly version, you 
now type in both the CLOCK CREATE and the SET ' 
CLOCK programs, and SAVE them as MAKCLOCK. 
BAS and SETCLOCK.BAS, respectively. Now you 
RUN MAKCLOCK. BAS; it will check its DATA, and 
if everything is copacetic, it will write out an AUTO- 
RUN.SYS file to a DOS disk, which you provide. 

The MAKCLOCK program asks you whether or not 
you're using Atari DOS. If you are, a different ver- 
sion will be written. This version disables the Clock 
on a DOS call to prevent it from locking up because 
of overwrite and VBI problems with Atari DOS. 

If you typed in the assembly version, set DOSII? 
variable to 1 if you're using Atari DOS. 

Now, boot up with this disk. You'll see nothing 
different. But wait, RUN SETCLOCK.BAS and IN- 
PUT the correct time. After you type in the seconds 
and press RETURN, a graphics line will appear at 
the top of the screen (after one second). Go ahead, 
press SYSTEM RESET. Naturally the Clock sedulous- 
ly remains, adjusting itself to compensate for the 
delay. 

Next, change to a different graphics mode. Again, 
it keeps on ticking. For the final test, LOAD a pro- 
gram. The Clock will stop while it's LOADing, but, 
after that's done, it will adjust again. If this is all you 

(continued on next page] 
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want to use the Clock for, you've gotten as far as you 
have to. 

Normally, the Clock LOADs in at $2200 (8704), 
which is the OS/A+ DOS XL MEMLO. If you're us- 
ing a different DOS (say, DOS XL with an XL com- 
puter, and you get a MEMLO as low as $0A00], go 
right ahead (if you have an Assembler) and change 
the origin. Reassemble to disk as AUTORUN.SYS. 

Important memory locations used. 

First, note that START refers to the load address 
(defauh = $2200). 
START — Latch 

A value non-zero but less than 128 stops the 
Clock, but the time is kept. 

A value non-zero but greater than 127 stops the 
Clock. 

A value of zero (the default) displays the Clock 
and keeps the time. 

HOUR = START + 75 
MINUTE = START + 76 
SECOND = START + 77 

These locations are where you can read the Clock. 
Note, however, that a time of 5:15:58 is stored as 
follows: 

$05 )5), $15 (21), and $58 (88) 
Astute readers will realize that I am storing these 
values in binary coded decimal (see the Boot Camp 
tutorials, issue 15 in particular). If you don't know 
how to convert hexadecimal to decimal, here are ex- 
amples: 

$15 = 1 * 16 + 5 = 21 
$58 = 5 * 16 + 8 = 88 

Well, that's about it. I hope that you will find the 
Atari Clock as useful as I have. D 

Listing 1. 
BASIC listing. 

180 REM KltmtKllKWIIMItMWmCIIKMKlIICWKKKW 
118 REH * ATARI CLOCK CREATE « 
128 REN * by Jortathan Buckheit » 

138 REN KmCKKllKMKWKKlCmCMMKMMKMKmtM 

148 REN 

158 GRAPHICS 8: POKE 752,1:? "444Readin 

g DATA": DIN BUF$f488) 

168 ? "^Reading Line: ":LINE=338 

178 POSITION 16,5:? LINE 

188 TRAP 228: FOR 1=1 TO 25: READ A: ON A 

=256 GQSUB 498:5UN=SUmA:L=L+l :BUF:SCL, 

L)=CHRf (A3 :NE}IT I 

198 IF PEEK (1833 t256«PEEK (184) <> LINE T 

HEN 388 



288 READ CKSUH:CK5UN=CK5UHt (CHAR=A5C(" 

V")):IF 5UN=CKSUN THEN LINE=LINE«18:G0 

TO 178 

218 GOTO 298 

228 IF PEEK (1953 <>6 THEN 298 

238 ON LEN(BUF$3<>488 GOTO 198:? "II4DA 

TA linesO.K.":? "^insert a DOS disk, 

press afiliH ." 

248 IF PEEK (532793 <>6 THEN 248 

258 TRAP 318: OPEN ttl,8,8,"D:AUT0RUN.SY 

268 POKE 858,ll:ADDR=ADR(BUF$3:P0KE 85 

2 , ASC (CHR$ (ADDR3 3 : POKE 853 , INT (ADDR/25 

63: POKE 856, 136: POKE 857,1 

278^ X=USR (ADR ("hhH2LUQ"3 , 163 : IF PEEK (8 

513>127 THEN 318 

288 ? "4File Written. ":POKE 752,e:END 

298 ? "+lncorrect DATA at line ■';LINE: 

LIST LINE: POKE 752,0: END 

388 ? "«Line ";LINE;" is Hissing!":POK 

E 752, 8: END 

318 ? "<lkDiSk WRITE ePPor.":POKE 752,8: 

END 

328 REH * HL DATA FOLLOWS if 

338 DATA 255,255,8,34,251,34,255,256,8 

,8,168,81,162,34,169,6,32,92,228,32,13 

.34,169,64,141,2581 

348 DATA 231,2,169,35,141,232,2,96,112 

,112,66,35,34,1,8,8,8,8,8,8,8,8,8,8,8, 

376 J 

358 DATA 0,8,0,8,52,41,45,37,26,8,8,8, 

26,8,8,26,8,8,8,8,8,8,0,8,8,4022 

368 DATA 8,8,0,8,8,8,8,8,8,96,8,13,173 

,8,34,48,61,173,48,2,281,27,208,7,173, 

5286 

378 DATA 49,2,281,34,248,27,173,48,2,2 

4,185,3,141,33,34,173,49,2,185,8,141,3 

4,34,169,27,7136 

388 DATA 141 , 48 ,2 ,169 , 34 ,141 ,49, 2 , 286 , 

78, 34, 288, 15, 238, 79, 34, 169,68,141' 78,^ 

4,165,66,13,8,9348 

398 DATA 34,248,3,76,95,228,286,88,34, 

288,8,169,13,141.88,34,286,78,34,248,1 

73,77,34,24,185,11968 

488 DATA 1,141,77,34,281,96,288,39,162 

,8,142,77,34,173.76,34,24,185,1,141,76 

,34,281,96,288,14349 

418 DATA 21,142,76,34,173,75,34,24,185 

,1,141.75,34.281.19,288,5,169,1,141,75 

.34.286,79,34,16456 

428 DATA 288,185.173,75,34.32,4,35,148 

,54,34,141,55,34,173,76,34,32.4,35,148 

.57,34.141,58,18444 

438 DATA 34,173,77,34,32,4,35,148,252, 

34,119.35,68.34,141.61,34,76.95,228,72 

.74,74,74,74.28518 

448 DATA 32,16,35,168,184,41,15,24,185 

.18,96,173.2,34,133,18,173,3,34,133,11 

,173,14,34,133,22216 

458 DATA 12a173,15,34,133,13,172,96.22 

8,174,97,228.169,6,32,92,228,169,8,141 

.231,2.169,34,141,25885 

468 DATA 232.2,188,18,8,165,12,141,14, 

34,165.13,141,15.34,169,4,133.12.169,3 

4,133,13,168,81,26999 

*7« ggTA 162,34.169,6,32,92,228,173,1, 

34, 288, 3, 76, 16,34,165, 18, 141,2,^4, lis' 

11,141.3,34,28973 

488 DATA 169,28,133,18,169,35,133,11,7 

6,16,34,226,2,227,2,64.35,8,8,8,8,8.8, 

8,8, 38335 
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490 ? .f "Using DOS II CY/N)?";:OPEN It 

3 4 8 "K * " 

Sfie'TRftp'seezGET tt3,CHAR:IF CHAROASCC 

"Y") AND CHAROASCC'N"] THEN 586 

518 CLOSE tt3:? CHR$CCHAR):A=8:IF CHAR= 

ASCf'V'J THEN A=l 

528 RETURN 



CHECKSUM DATA. 

fsee page 13] 

188 DATA 526,491,472,535,86,369,498,25 
1 , 674 , 625, 132 , 717 , 622 , 816 , 838, 7636 
258 DATA 434,628,381,276,953,838,851,6 
13,694,89,248,165,413,933,298,7806 
488 DATA 941,712,723,923,892,262,128,6 
38,884,946,698,997,595,9331 



ULTIMATE STORAGE 

Organize your ANALOG Computing library with sturdy custom-made 
binders and files in deep blue leatherette with embossed silver letter- 
ing, labels included. One binder or box file holds 12 issues (1 year). 




The ANALOG Computing binder opens flat. Priced at only $8.50 
each— 3 binders for $24.75 or 6 binders for $48.00, postage paid. 
The ANALOG Computing fiie is compact, with easy access. Only 
$6.95 each— 3 files for $20.00 or 6 files for $36.00, postage paid. 

Foreign orders add S2.50/item shipping and tiandling. Allow 4 to 5 weeks for delivery. 



I enclose my check/money order in the amount of $ 

Send me-. ANALOG files ANALOG binders. 



PLEASE PRINT. 

Name; 



City: Stale: Zip; 

Mail to Jesse Jones Industries 

P.O. Box 5120, DEPT ACOIVI, Philadelphia, PA 19141 

Satisfaction guaranteed or money refunded. 
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118 REH KmtMKItKM SET CLOCK ICKKKKKKK 

128 REN 

138 REN A PrograH To Set ATARI CLOCK 

148 REN 

158 REN Hritten by Jonathan Buckheit 

168 REN 

178 REN YOU HUSt have the AUTORUN.SYS 

188 REN file loaded in before running 

198 REN this progran! 

288 REN 

218 START=8784:REN $2288 - If you Chan 

ged the origin, change this also! 

228 REH 

238 OPEN ttl.4.8,"E;";-^ ;■» " asiJajHiH 

MyipMjijj|AjaHJ;Hi jragKa" = PTM HExsmTp 

OKE START, 255 

248 IF PEEK 17433 *256 *PEEK 1744? OST AHT4 
328 THEN ? :? "Q g-lH.-IMiHiIilMJiaM I 

llH'H'BllPW' : END 

258 TRAP 258:? :? "Enter Hour :"; :GOSUB 
29e:H0UR=BYTE:IF H0UR<1 OR H0UR>18 TH 
EN 258 

268 TRAP 268:? :? "Enter Ninute:"; ;GOS 
UB^298:HINUTE=BVTE:IF NINUTE <8 OR HINU 
TE>96 THEN 268 

278 TRAP 278:? :? "Enter Second:"; :GOS 
UB 298:SEC0ND=BYTE:IF SECOND <e OR SECO 
ND>96 THEN 270 

288 POKE START+75, HOUR: POKE START+7e,M 
INUTE:POKE START«77, SECOND: POKE START+ 
78, 68: POKE START+79,8:P0KE START, 8 
285 NEH 

298^INPUT «tl,HEX$:IF LEN(HEXS)=1 THEN 
HEX$ C2) =HEK$ : HEX$ CI , 1) ="8" 
388 B1=ASC CHEHS) : B2=ASC f HEK$ €2) ) 
318 NSB=Bl-48- CB1>641»7 : LSB=B2-48- f B2> 
64J«7 : BYTE=LSB+16«NSB : RETURN 



CIRCLE #132 ON READER SERVICE CARD 



CHECKSUM DATA. 

fsee page 13) 

118 DATA 974,88,684,86,382,92,337,776, 

723,76,415,82,551,63,339,5588 

268 DATA 623,472,31,113,924,887,488,34 

58 



Listing 3. 
Assembly listing. 



I ATARI CLOCK 

I by Jon«th«n Buckhalt 

I 

I 

I ProgrAd Equ«t«« 

BETVBV - aEASC I VBLANK aat 

SYBVBV - (EASF 10. S. VBI 

DLISTL - •a23a IDisplay list 

DLI8TH - •B231 laddraas 

DOSINI - *»C (DOS Inlt 

MEtlLO - •■2E7 ILOH aanDry 

INITAD - MaeZ I Auto-Boot 

CRITIC - •42 lCrltlc«l I/O 

DOaVEC - OA I DOS Vac tor 

ORIBIN - •22«B IChanga 

I 

I RESET Routina FollOHa 

1 

I 
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continued 



LATCH 


•■ 


ORIBIN 


IChanga. • . 


.BYTE •FF 


1 Clock ON/OFF 


D08II7 


.BYTE • 


ID08 II Flag 


D08H0LD 


.MORD • 


IDOBVEC Copy 


RESET 


LDV 


• <VBI 


I8at up for an 
liaaadlata VBI. 




LDX 


B >VBI 




LDA 


•h 






JBR 


BETVBV 




BOOT 


J8R 


BOOT 


IBoot DOS. 


FIXHEHLO 


LDA 


• <NEUHEHLD IHava tha LoH 




8TA 


HEHLO 


IHaaorv oolntar 




LDA 


• >NEWnEHLa lovar ua. 




8TA 


HEHLO* 1 






RT8 






1 Pragra 


a Btoraga Araaa 


NEHDL 


.BYTE »7».»7B.»42 




■MORD TExt 






.BYTE ••! 




BACK 
TEXT 


.MORD • 




.BBYTE " 


TIHES " 


SHOUR 


.8BYTE " 1 




BMINUTE 


.8BYTE " I" 


S8EC0ND 
HOUR 


.8BYTE " 


■ 


.BYTE • 




HINUTE 


.BYTE • 




SECOND 


.BYTE ■ 




H8EC0N0 


.BYTE • 




H8EC0N0 


.BYTE • 




csecoND 


.BYTE 13 




1 Vartlcal Blank Intarrupt 


VBI 


LDA 


LATCH 


ILoek out? 




BHI 


EXITVBI 


lYaa. 




LDA 


OLIBTL 


■Do Ha naad to 




CHP 


• <NEWDL laodlfv tha 




BNE 


PUTDL 


IdlaplaV ll*t7 




LDA 


DLI8TH 






CHP 


1 >NENDL 




BEB 


CLOCK 




PUTDL 


LDA 


DLIBTL 


lYaa! 




CLC 




ISava addraaa 




ADC 


•3 


lo-f thla DL 




8TA 


BACK 


l-for our DL. 




LDA 


DLI8TH 






ADC 


•• 






BTA 


BACK-fl 






LDA 


• < NEHDL ITall ANTIC 




BTA 


DLIBTL 


iMhara ha can 




LDA 


• >NEHDL l-rind our DL. 




BTA 


DLIBTH 




CLOCK 


DEC 


H8EC0ND 


lOna aacond? 




BNE 


EXITVBI 


INo! 




INC 


HSECOND 






LDA 


•6B 


IRaaat b»tt\ a* a 




BTA 


HSECOND 


1 aacond countar. 




LDA 


CRITIC 


■Critical coda? 




OR A 


LATCH 


lYaa, turn o-f-f 




BEB 


UPDATE 


Iclock. 


EXITVBI 


J HP 


8Y8VBV 


lExlt VBI. 


UPDATE 


DEC 


CBECOND 


iBlnca VBI la 




BNE 


NEXT 


Ijuat undar 
lI/ABth aacond 




LDA 


113 




BTA 


CSECOND 


iMa auat adjuat 




DEC 


HSECOND 


l«or thia. 


NEXT 


BED 




IDaclaal aoda. 




LDA 


SECOND 


INaNt aacond. 




CLC 








ADC 


tl 






STA 


SECOND 






CHP 


••«■ 


lOvarf 1oh7 




BNE 


PRINT 


INo! 




LDX 


•■ 


IRaaat aaconda. 




BTX 


SECOND 






LDA 


HINUTE 


INaxt alnuta. 




CLC 








ADC 


• 1 






BTA 


HINUTE 






CHP 


••6* 


lOvarfloM? 




BNE 


PRINT 


INo! 




BTX 


HINUTE 


IRaaat alnutaa. 




LDA 


HOUR 


INaxt hour. 




CLC 








ADC 


• 1 






BTA 


HOUR 






CHP 


••13 


IDvarf lOH? 




BNE 


PRIHT 


INo! 




LDA 


• 1 


IRaaat houra. 




BTA 


HOUR 




PRINT 


DEC 


HSECOND 






BNE 


UPDATE 






LDA 


HOUR 


IPrlnt HOURS. 




JBR 


CONVERT 






STY 


BHOUR 






STA 


BHOUR+1 






LDA 


HINUTE 


IPrlnt MINUTES. 




a BR CONVERT 




STY 


SniNUTE 






STA 


BHINUTE-vl 




LDA 


SECOND 


IPrlnt SECONDS. 




JSR 


CONVERT 






BTY 


S8EC0ND 






BTA 


B8EC0ND+1 




JHP 


BY8VBV 


lEalt VBI. 


1 HEX to 


INTERNAL ATASCIt 


CONVERT 


PHA 




IHold on to It. 




L8R 


A 


IBat tha -Tour 




LSR 


A 


IHSB blta. 




LBR 


A 





LBR A 

JSR HEX 

TAY 

PLA 

AND •••F 

CLC 

ADC BtBA 

RTS 



IConvart. 

I Sat tha four 
ILBB blta. 
IConvart nlbblf 
Ito Intarnal. 



DOB II Dlaabla Routlna 


HDOB LDA 


DOSHOLD iRaatora DOB Vaetor 


BTA 


D08VEC 


LDA 


DOBHDLD+l 


STA 


D08VEC*1 


LDA 


BOQT+1 IRaatora RESET Vaetor 


BTA 


D08INI 


LDA 


BOOT+2 


BTA 


DOBINI+l 


LDY 


BYBVBV+1 IRaatora Old VBI 


LDX 


8YBVBV'f2 


LDA 


•••i 


JSR 


BETVBV 


LDA 


• <ORiaiN IRaatora HEHLO 


BTA 


HEHLO 


LDA 


• >ORIBIN 


BTA 


HEHLO-^l 


JHP 

MHEHLO 


(DOSVEC) I Call DOB 


PoHar-Up Routlna <Dalatad) 



LDA DOBINI IBava DOBINI 

BTA BOOT+1 Ivalua. 

LDA D08INI+1 

BTA BOOT+Z 

LDA • <REBET llncluda ua 

STA DOBINI I In tha SYSTEM 

LDA • >RESET IREBET chain. 

STA DOSINI-fl 

LDY • <VBI IBat up for an 

LDX • >VBI liaaadlata VBI. 



LDA 


»b 


JSR 


BETVBV 


LDA 


008II? IDOS 11? 


BNE 


DOS I I lYaa! 


JHP 


FIXHEHLO 



I 

I Auto-Boot 



LDA DOSVEC ISava DOSVEC 

STA DOSHOLD 

LDA D08VEC+1 

BTA D08H0LD41 

LDA • <NEHDOS I Point DOB vaetor 

STA DOSVEC Ito our NEUD08 routlna 

LDA • >NEHDOS 

STA DOSVEC*! 

JHP FIXHEHLO 



•- INITAD 
.WORD POMER 




PAGE 78 / JUNE 1985 



ANALOG COMPUTING 



^ S COMPUTER PALACE we know atari! 




INDUS GT DISORIVE 

• Free Software 

• Double Density 
» 1-Yr. Warranty 

Our Most Popular Drive! 

We recommend and sell more of these drives 
than any other. It's so quiet that you'll 
probably forget you are using a disk drive. 
Flip-up dust cover. LED readout, and FREE 
SOFTWARE (DOS XL, Word processor, Data- 
base, Spreadsheet, Programming bool< by 
DatamosI )...This pacl<age is hard to beat! 

New Low Price $259.95 



GAMES 

Slar Raiders 
Jousl 
Robolron 
Donkey Kong 
Dig Dug 
Defender 
Ulysses 
Tennis 
Ullima II 
Ultima III 
Bounty Bot) 
Strip Poker 
Bridge 4 
Spy vs Spy 
Castle Wolfenst 
Poker Sam 
Bristles 
CuIIhioats 
Enchanter 
li(L Baseball 
Chess 7 
Ctieckeis 
Pilslopll 
Computer A/tibu 
Broadsides 
Kamplgruppe 
Adventure Write 
All Baba 
Return Hercules 
Savage Island 
Voodoo Castle 
Secret Mission 
Dimension-X 
Zombies 
Bruce Lee 
Conan 

Gtiost Busier; 
Arction II 



13.95|C 
35.70 C 
35.70lC 
27.90|C 
27.90 C 
17 95 C 
19.95 D 
13.95 C 
52.50 D 
39.95 D 
44.90 C 
31.50 D 
22 50 D 
26.90 D 
26.90 D 
22.50 D, 
26.90 D. 
31.50 D 
31.50 
35.10 D 
59.50 D 
44.90 D 
35.1Q|D 
52.50iD 
35 10 D 
52.50 D 
26.90 
26.90 D 
28.90 D 
17.90 T 
17.90 T 
17.90 T 
31.50 0, 
31.50 D, 
35.10 0, 
35.10 D 
26 90 D 
35 1DD 



EDUCA- 
TIONAL 

Hundreds of Titles Please 
call us (503) 683-5361 

BOOKS 

Misc: 

6502 Programming 18.95 
6502 Subroutines 17.95 
14.50 
14.95 
15.95 
15.95 
12.95 
24.95 
14.95 



Advd Pro Tech At 
Advent w/Atari 
Assem Lan Progr 
Basic Atari Bas 
Basic Alan kids 
, Besl Antic w/Dsk 
. Elementary Alan 



Tech. User Notes 26.90 



Assembler 
Basic Fasi & Bel 
Basic Source Bk 
For Kids 8-80 
Games & Rec 
Graphics &Arc 
Playground 
Roots 

Sound & Graphics 
Users Encyloped 
W/55 Programs 

Compute: 

2nd BK lyiach Lan 
TFBOAIariGrapli 
J FBt] Alan Games 
yPBOAlan 
Great AOV Games 
2nd Bk of Atari 
3rd Bk of Alan 



15.95 
19.95 
12.95 
15.95 
14.95 
16.95 
9.95 
14.95 
10.95 
19.95 
14.50 

14.95 
12.95 
12.95 
12.95 
12.95 
12.95 
12.95 



Protect Your 
Equipment 

Deluxe 




DUST COVERS 

Custom fitted, attractive leather brown color: 

• ATARI 400, 800, 600/800/1200XL, New 
XE&ST, 410, 810, 1050, 1025, 1027, CX85 

• EPSON. GElyllNI, PROWRITER printers 

• INDUS. RANA. PERCOM, TRAK disk drives. 

Additional covers ordered 
at same time 

ONLY $7.95 



ONLY 



$8.95 



EACH 



EACH 



DISK NOTCHER 
SPECIAL! 

Only 
$9.95 

Now use both sides of 
your diskettes 

Simply place the disk against the 
built-in stops and squeeze 




48K Disk 
$39.95 

Program Covers 
4 Disl( Sides 




CALL us AT (503)683-5361 FOR INFORMATION 



Outsmart Your Friends 
Outwit The Dragon 
Join The Quest 



A new concepi in computer gaming. Inlellectual challenge, strategy and arcade action. Each 
player assumes the role of a lord with a questing party of three characters. Complete the 
quest, earn the most gold hy answering questions and battling the dragon. Win the favor of 
the king and thus, the game 
• Utility Disic 1000 Additional questions plus create your own... $24.95 



FREE CATALOG 1^^^ 



with any order . 
first purchase) 



or send $1 (refundable with 



You will receive tlie most com- 
prehensive reference catalog 
available. Containing hun- 
dreds of software and hard- 
ware listings with illustrations 
and descriptions, our main 
catalog will give you the 
answers you need. Join our 
mailing list and receive free 
flyers with updates and special 
offers. 




IF YOU DON'T HAVE OUR 

CATALOG... YOU'RE 

MISSING OUT! 



NEW! COMPUTER PALACE B.B.S. 

We are now running a Duilelin board system as a service lo our modem 

cuslomers You will be able to place an order with us by using your 

modem |usl follow Itie screen mstruclions We will be lealurmg download ' 

files such as public domain games, ulililies, ana program demos We will 

t\a\je a section aboul Ihe latest Alan products news, and rumors and for those frustrated 

adventurers, there will even be a section ol hints and answers for the whole Alan adventure 

realm' 

1-503-683-7454 
(6:00p.m. to 8:00a.m. PST) 



Give us a call! 



'^ 



Peachtiee Scrftwaie 



'^ 



Now. one ol the most popular accounting systems is awailale for Atari. Back to Basics 
Accounting System is a double entry, accrual accounting system consisting ol three 
interactive packages for the small business: General Ledger, Accounts Receivable and 
Accounts Payable. A powerful system, it includes automatic posting, system generated 
mailing labels and password security. For the non-accountant, it comes with one of the 
most comprehensive manauals we have seen. For the expert, it will finally put your Atari 
in business. Requires 2 drives. 48K Disk-System Package. ..$195.00. Each $95. OP 



One of the most versatile data-base programs available. 



Features: 



• LIGHTNING FAST RETRIEVAL 

• FAST SORTS ON ANY FIELD 

• SUPPORTS UP TO 4 DRIVES 

• SINGLE OR DOUBLE DENSITY 

• STORE ABOUT 1200 RECORDS 
PER DISK SIDE IN DOUBLE DENSITY 

• MUCH MORE' 



New Enhanced Version 2.0 
Includes: 

.n„ ■>• I • ON-SCREEN PROt^PTS 
48K Disk ■ HELP SCREENS 

«>jn AC • STATE ABBREVIATION TABLE 
3>4y . HO • PRINT LABELS 1 . 2. or 3-UP 

• REOEFINABLE FIELDS 

• MERGE-CREATE COMBINATION FiLES 

• DELETE DUPLICATE-AUTO or MANUAL 



New! Mail Merge Utility. . $19.95 

Now you can use your Super fvlailer + records with Atarwriter and Letter Wizard. 
Use names and addresses to create form letters. Input special characters into the 
word processing programs to tell Super Mailer-f where to put Ihe information. It's 
as easy as 1...2...3I 




Super-5 

CP150 

Printer 

$279.00 

+ FRT 

A "best buy" I Features "square dot" print 
head with the best print quality for the money. 
130CPS, bi-directional, graphics, and EPSON 
compatible. Plain or Pin-led paper 



BUSINESS 



Assm Editor 
Monkey Wrch 11 
Atariwriler 
Lellerperfect 
Spell Wizard 
ABC Compiler 
B/Graph 
PeachtreeG/L 
^eachlree A/P 
Peachlree A/R 
Home Accountant 
Synfile 
Syncalc 
Syntrend 
Synslock 
Home-Calc 
l^ac/66 
Action 
Basic XL 
Writer's Tool 
Tele-Talk 
Financial CookDk 
Basic Cartridge 
Graphic Gener 
MiCFosft Basic 2 

PARTS & 
MISC 



31.50 
29.95 
39.95 
87.90 
44.90 
69.95 
62.50 
95.00 
95.00 
95.00 
67.50 
49.95 
49.95 
49.95 
35.10 
35.10 
87.30 
87.90 
87.90 
67.90 
44.90 
44.90 
29.90 
22.50 
55.00 



Disk Bank(501 
DiskBank(35) 
Regular Joystick 
Deluxe Joystick 
Swivel Base 
Joystick Cord 
Joystick Hanttle 
Joysiicit Board 
J slick \T Ext 
Surge Protector 
Printer Inlrface 
64klor600XL 
Relax 
Stieriock 

SPECIALS 

Rally Speedway 
Shamus 
Pacific est Hwy 
CrosslirelT- ) 
Match Racer 



15.95 

9.35 

9 30 

19.35 

33.35 

295 

1.49 

2.49 

9.95 

39.95 

69.95 

73.95 

99.95 

26.90 



19.95C 
9.350 
9.95D 
9.95 
9.950 



Disk Cleaner 
800 Power Supply 
10 Disk Mailers 
10 Generic Disks 
Ten Key Pad 
Toucti Table! 
CompuServe 
Indus Dr Stacker 
Oak Monilor Sid 
Printer Stand 



13.95 
24.35 
E.50 
13.95 
39.95 
54 95 
39.95 
13.35 
29.35 
24.95 



Bandits 
Jawbreaker 
Eastern Front 
Canyon Clmb{T- 
Pool 400 
Speedway Blast 
Replon 
Wayou! 
Threshold 
Stellar Shullle 
Wiz of Wor 
Deluxe Invaders 
Gorl 

Miner 2049ei 
Choplilter 
Lords ol Karma 



9. 350 
9.95D 
3.35T 
D) 9.95 
14.95C 
14.950 
9.350 
9.350 
9.950 
9.95T 
17.95C 
17.95C 
17.95C 
17.95C 
19.950 
9. 950 



D Disk T Tape 
C.Carlridge 



New ATARI 130/520ST Computers 




128K-$399/512K-S599 

The current flagship of the Atari Family has 
arrived, utilizing the speed of the Motoria 68000 
CPU . With 1 28K or 51 2K. you will have power at 
prices you won't believe. And with a mouse, 
pull-down menus, windows, icon graphics and 
cut and paste features that allow you lo integrate 
spreadsheet, text and graphic files, creative 
solutions have never been easier. The quantities 
are limited, so place your order now lo get yours 
as soon as possible. 



PriiUSho p ^ 



Need a , . - greeting card, letterhead, logo, 
ad flyer, announcement, note card, station- 
ery, report cover, award certificate, sign or 
bulletin? Make one in minutes! How about a 
jumbo banner? Simple! ! Make it 30 feet long if 
you like. With only a few key strokes, you can 
write, design and print like a pro. M\ you need 
is in ttie program'. 8 typestyles in multiple 
^^ sizes with solid, outline and 3-D format, 
s] border designs, background patterns, and a 
^ I wide range of pictures and symbols Also in- 
13 1 eluded are: The ability to superimpose text 
??'over any picture or design. Use illustrations 
Li. from other graphics programs. Swirling ani- 
£?5 mations that you can freeze for background 
fe designs 43|( Q $39.50 



COMPUTER B- 
MLACE ^ 



OPEN M-F. 9-6 Sat 10-4 (Pacific Time) 

2160 W 11 111 Avenue Eugene, Oregon 97402 




USE YOUR CREDIT CARD & CALL 

Toil Free 1-800-452-8013 
• ORDERS ONLY, PLEASE ic 

, There 's never a penalty lor using your credil card I 
For Intormalion, Call (503) 683-5361 



SHIPPING INFO: Minimum $2.90 Ground. $4 75 Air Actual 
Cost depends on weight Call (503) 683-5361 (or information 
WARRANTY INFO: Eveiythlng that we sell is warrantied by 
the manufacturer. If any item purchased from us fails to per- 
form properly when you receive it. call us at (503) 683-5361 
so that we can assist you. No returned merchandise accepted 
without authorization. Defective software will be replaced 
with another copy of the same program, otherwise, no soft- 
ware is returnable. 



CIRCLE #133 ON READER SERVICE CARD 








ATASCII 



by Mark Comeau 



ATASCII Animation allows you to take advantage 
of the powerful editing features and graphics charac- 
ters of your Atari computer, using them for something 
that computers do well — animation. 

Fast, sometimes smooth graphics can be made eas- 
ily and moved around quickly. Full graphics screens 
can be moved up and down with a few keystrokes. 
Any ATASCII character can be used in your creations, 
and any editing key can be used to move them. 

Once you have created your animation, it can be 
sent over the modem and seen immediately by any 
Atarian. The file can also be used as a "logo" on a 
bulletin board system (BBS). 

These logos usually include the name of the BBS, 
the phone number, the name or handle of the system 
operator (Sysop) and some nice graphics. If you can 
develop the art of making logos, Sysops may use 
yours on their BBS and allow you to use more BBS 
functions. 

Type in the program exactly as it appears. Type 
all the control characters correctly; you'll need prac- 
tice with them if you don't know your way around 
them well enough yet. It isn't necessary to type in 
all of the REM statements, but don't they look nice? 
Check your work with Unicheck (see page 13). 

Once you type in ATASCII Animation correctly, 
type RUN. The menu will fade onto the screen. The 
first item on the menu is. . . 
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GRAPHICS 



« 





Animation 




A. Continue/Make Screen. 

When you press this, the menu will glide off the 
screen, and you'll see the cursor in the corner. This 
is where you type/make your logo. Try hitting CTRL 
and any letter key. If you're unfamiliar with the graph- 
ics characters, look up the keyboard layout in the user 
manual or BASIC manual. 

For the sake of demonstration, I will make a nice 
logo for a friend. I'm going to type out Sue + Frank 
in large, friendly letters. 

Now that you have some large letters on the screen 
(I have a very nice Sue + Frank on mine), try going 
to the top of the screen (CTRL-any arrow key a few 
times) and SHIFT-INSERT/SHIFT-DELETE. That will 
make all of it move down, then up. Wow! That was 
pretty neat. . .Well, maybe not that neat. 

Now we want to go back to the menu (at least, I 
do), so press any of the console keys. Now, press 1 
on the menu again, and you get to see your master- 
piece again, moving down and up! 

Notice how the menu fades down off of the screen 
when you select an option? To do this, go to the bot- 
tom of the screen, press CTRL-INSERT and CTRL--^ 
over and over, until you reach the top. This will make 
it do the same thing as the menu. Try typing all kinds 
of keys and any editing key for animation, then go 
back to the menu for. . . 

C. Clear Graphics. 

Already? This option deletes your logo from mem- 
ory and sends it to, as my father says, "bit heaven." 



Before you kill it off, the computer asks, ARE you 
sure? If you are, type Y and RETURN. I don't want 
to send Sue + Frank to bit heaven, so I press Nand 
RETURN. Let's find out what else is on the menu. 

S. Save Graphics. 

When you want to put your masterpiece onto the 
disk drive, this option is especially useful. 

Just enter the filename as FILESPEC.EXT. The logo 
is saved on disk like a text file and can be manipu- 
lated as any other text file can be. 

Please note that each logo has a clear screen (CHR$ 
(125)) character at the beginning, so, no matter where 
it's shown, the screen will always clear when your 
masterpiece is being shown. 

If you want a disk directory, just press RETURN. 
If you really don't want to save anything right now, 
press CTRL-Q and RETURN to go back to the menu. 

L. Load Graphics. 

This is just like Save Graphics, but you'll be taking 
it off the disk, instead. As it loads, it will be dis- 
played, so you can see your masterpiece. If you are 
unsure of the many fine features of the Save option, 
review it immediately. 

T. Take Picture. 

When you typed out those large, friendly letters, 
did you get it right on your first try? Or did you have 
to delete a lot of characters that you didn't want? 

When you go back to look at ^^our logo, you see 
every keystroke that you made. Your logo may have 
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LOTSABYTES CONTINUES THE WAR ! 

WAR on high prices ' We're going to put an end to the software price ripoff. And YOU 
can help ' Just keep those orders coming while you continue to enjoy the quality, 
quantity, selection and low prices that you deserve. Our National Public Domain Copy 
Service will save you lime, tedious work, and money And our exclusive distribution of 
stiarply discounted commercial programs will bring you some of the finest programs for 
the lowest possible price, usually 50% and more off retail' You continue to get FREE 
BONUSES with each purchase of three or more disks. 



PUBLIC DOMAIN SOFTWARE 



GAMES 

Two full disk 

Sides packed 

with over 

25 games 

including some 

Arcade quality 

$7.95 



#2 
UTILITIES 

25 powerful 

programs to 

help you get 

the most out of 

your Atari 

computer. 

$7.95 



#3 
AMS MUSIC 

25 Advanced 

Musicsystem 

files including 

a new Player 

program 

2 sides. 

$7.95 



#4 
GAMES 

All different i 

14 m'ore 
better games 

on 2 disk 

sides. Some 

Arcade types. 

$7.95 



#5 
EDUCATION 

Loaded with 

28 programs 

on 2 disk sides 

Fun learning 

lor the whole 

family 

$7.95 



#6 
AMS MUSIC 

25 all-time 

favorites 

with a 

Player 

program. 

Two sides. 

$7.95 



#7 
GAMES 

Two disk sides 
packed with 

14 more 
great games. 

Some 

Arcade types. 

$7.95 



#8 
UTILITIES 

17 more 
power-packed 

utilities to 

help unleash 

lull potential 

of your Alan. 

$7.95 



#9 
GAMES 

Two full sides 
filled with 
17 of the 
best and 
most recent- 
Some Arcade. 
$7.95 



#10 
UTILITIES 

A new 

assortment 

of 17 great 

and powerful 

programs 

Don't miss it ' 

$7.95 



#11 
GAMES 

NEW 
Our newest. 

2 sides 

filled with 

great games 

$7.95 



#12 
ADVENTURES 

NEW 
2 full disk 

sides 
filled with 

text 

adventures. 

$7.95 



#13 
EDUCATION 

NEW I 

2 disk sides 

filled with 

something 

for 

everyone. 

$7.95 



#14 
AMS MUSIC 

NEW! 

2 sides 

filled With 

great music 

and a player 

program 

$7.95 



#15 
UTILITIES 

A/EW.' 

Another 

assortment 

of fine 

programs. 

Not to be missed. 

S7.95 



LotsaBytes EXCLUSIVES 




ADVANCED 
MUSICSYSTEM II 

by LEE ACTOR 
Allows you to creale music 
with your Atari computer! 
All new machine code. 

* Control over pitch 
duration, envelope 
dynamic level, meter, 
tempo and key, 

* 4 independent voices 

* 5'. octaves per voice 

■ Save up to 8200 notes 
' Custom DOS 

* FULL instructions 

* 24K disk 
Originally S29.95 Only $14.95 

ORIGINAL ADVENTURE 

by Bob Howell 

For all Atari computers. 

The Original 

Colossal Cave 

Adventure faithfully 

reproduced from the 

mam-frames' 

This IS the one 

that launched the whole 

Adventure craze of today 

■ Two mazes 
' 130 rooms 

* Deadly Dragons 

* Nasty Dwarves 

* Tenacious Troll 

* The Pirate & More' 

* 86 coded hints 

* SAVE.'RESUME 
' 4aK disk or 32K tape 
Originally S24.95 Only $14.95 




QUALITY WORD PROCESSING 

ESI WRITER I At last a brand-new Word Processor 
that has more features and is easier to use than 
anything else available for the Atari. Easy for the 
beginner to use, it asks questions and remembers 
the answers. ESI WRITER is so sophisticated that it 
has many more features we don't even have room to 
mention ! Works with ANY Atari. 

* Reads any text file * Built in Help screen 
* Very fast ' * Works with ANY printer 

* Instant top, bottom or text location 

without scrolling! 
' Every printer feature * DISK ONLY (Any Atari) 

* Search and replace ' Block move text 
"Page eject/start * Set margins/lines etc. 

'Full justification * Print headers etc. 

* Block delete etc. * Change video color 

* Over 50 pages of docs and tutorials 
TRUST US ON THIS ONE' YOU WILL LOVE IT ' 

Originally S49.95 LotsaByles price $19.95 

* * FREE BONUSES * * 

Now lor each 3 disks ordered 
you may choose any 1 of the following disks 

FREE!! 
... buy 3 - get 1, buy 6 - get 2, buy 9 get 3 ... 

a. The Atari XL TRANSLATOR DISK 
that enables XL owners to use most 
400/800 software. FREE!! 

— or — 

b. An all different AlvIS IvlUSIC disk 
with Player. FREE! ! 

--or — 

c. Your choice of one of the P.D. disks - 
m, »2, #3, #4. #5, #6, #7, #8, 
#9. or #10 (specify one) FREE!! 




MUSIC MAJOR! 



Learn the basics of music with this light- 
hearted but very thorough approach. 
Covering such topics as note recognition, 
key signatures, note counting, and much 
more, it is designed for use by both the 
individual student and music class. 
This program includes a thoroughly 
illustrated manual and offers a QUIZ 
tVlASTER utility that allows the teacher or 
the self-taught student to create their own 
A-B-C-D type tests, with a sample quiz 
included- 
Originally S39.95 Only $14.95 



GREAT GAMES! 

SPACE GAMES: Three games for one low 
price'. In Aliens you can't get them all and 
the pace keeps getting faster. When you 
do get rid of most of them, you are left in a 
space quadrant peppered with mines. Will 
you Survive'' If you do, you must 
penetrate the alien's spaceship, survive a 
Robot Attack, and get back your stolen 
cloaking' device' Interested'' 
S24.95 list LotsaBytes price: $9.95 

THE BEAN MACHINE by Steve Robinson 
IS an Award Winning Arcade gaine that 
will drive you crazy balancing a series of 
beams while trying to get all the beans to 
roll down, without touching, all the while 
avoiding 'strange creatures' who drop in 
to steal the beans. It's addicting! 
S24.95 lisl LotsaBytes price: $9.95 

DIGGERBONK, another Award Winning 
game by Steve Robinson, challenges you 
to find your way through a continuously 
scrolling maze while avoiding soi'ne really 
strange creatures Along the way you will 
need to Bonk some of them, but watch out 
for the bombs 
S24,95 lisl LotsaBytes price: $9.95 

GUESS WHATS COMING TO DINNER 

lets you ti7 to manuever asnakethrough 7 
levels if you can keep it from starving or 
being electrocuted- Lots of surprises! One 
or two players. 
S24.95 lisl LotsaBytes price: $9.95 



CREATIVE LEARNING 
ADVENTURES 

Ages 4 to 10 — D/s/c only 

1. Hours of educational fun playing 3 
exciting creative adventures with a 
friendly alien learning about our planet 
Earth Hand.'eye co-ordination, drawing, 
and music skills are emphasized. 
S24.95 hsl LotsaBytes price: $12.95 

2. Four challenging learning games that 
are the favorites of our friendly alien 
Helps your child to develop logical 
reasoning ability. 

S24.94 list LotsaBytes price: $12.95 

3. These 3 Fun-Day learning games will 
help with intellectual development, 
hand.'eye co-ordination, logic, spatial, 
and analytical abilities. 

S24 95 list LotsaBytes price: $12.95 



LotsaBytes 



Full 100' Replscement guaranlee.Any disk (ound lo be defective will be replaced Iree and we will also retund 
your return postage. All orders shipped by First Class U.S. Mail. Add SI. 95 shipping and handling (or 1 lo 5 disks. 
Add S2.95 (or 6 lo 12 disks. California residents add 6"., sales tax. Outside of U.S.A and Canada add 1 5' , . U.S. 
Funds only. We accept checks or Money Orders. Sorry, no COD or Charge Cards, Allow I hree weeks for personal 
checks to clear. 

15445 Ventura Blvd., Suite 10H, Sherman Oaks. CA 91413 
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ATASCII Animation 



continued 



a perfect picture after all the keystrokes are shown, 
but you really don't like those mistakes. "This is go- 
ing to be seen by all my friends on the ultimate BBS," 
you say, "and I don't want them to see all of my mis- 
takes." Well, don't despair. Take Picture can make it 
look as if you never made a mistake. 

Let's try all of it. Press T and off we go. The com- 
puter says, WHILE PICTURE IS BEING DISPLAYED, 
PRESS OPTION TO SPEED UP, PRESS SELECT TO 
SLOW DOWN OR PRESS START TO TAKE PIC- 
TURE. I'll explain that later. 

DO YOU WANT IT TO COME UP FROM THE 
BOTTOM, the computer asks. If you say Y, then a 
CTRL-'^ will be added to the beginning of the pic- 
ture, causing it to be displayed from the bottom, 
scrolling up from here on in. I want mine to, so I an- 
swer Y. 

TAKE PICTURE OF LAST FRAME? comes up next. 
If, after the last character that you typed, you have 
a masterpiece you want to preserve forever in an 



error-free fashion, press Y. I, for the sake of demon- 
stration, do not. 

The computer clears the screen and starts print- 
ing all the characters that I typed, the same way I 
typed them. The characters are coming out a little 
slowly, so I push OPTION, and things speed up a 
little. 

I see that the word Sue is about to finish printing 
out (in large, friendly letters). For the sake of demon- 
stration, I only want this logo to say Sue, so I press 
SELECT and hold it down until the characters are 
coming out very slowly. The very last corner of the 
e comes out, and I press START. The screen turns 
black and gets lighter and lighter, until it's white. This 
takes a little time, but not much. 

The Take Picture option has done its job, and it 
returns me to the menu. I press A, and Sue comes 
out from left to right, top to bottom. There are no 
mistakes, and it looks quite nice, if I do say so myself. 

"But what happened to + Frank?" you ask. A few 




for the ATARI 800 or XL 



Cut your programming time from hours to seconds, and have 33 

direct mode commands and (unctions. All at your fingertips and 

all mode easy by the lylONKEY WRENCH II. 

The MONKEY WRENCH II plugs easily into the cartridge slot of your 

ATARI and works with the ATARI BASIC. 

Order your MONKEY WRENCH II today and enjoy the conveniences 

of these 33 features: 

• Line numbering 

• Renumbering basic line numbers 

• Deletion of line numbers 



• Variable and current value 
display 

• Location of every siring 
occurrence 

• String exchange 

• Move lines 

• Copy lines 

• Up and down scrolling of 
basic programs 



• Special line lormols and 
page numbering 

• Disl< directory display 

• Margins change 

• Home key functions 

• Cursor exctiange 

• Upper case lock 

• Hex conversion 

• Decimal conversion 

• Machine language monitor 

• DOS functions 

• Function keys 



The MONKEY WRENCH II also contains a machine language monitor 
with 16 commands that can be used to interact with iOO OK 

the powerful features of the 6502 microprocessor. p^y.7<J 



Have You KISSed 
Your Atari Lately? 

Introducing "KISS", a new, simpler, 

more powerful Word Formatter/Processor 

for your Atari 800, 600XL, and 800XL 

"KISS" comes in a cartridge, and is designed for the occa- 
sional user, yet simple enough for beginners and children. 
11 comes with an easyto read manual, that contains example 
text files. Check out these other "KISS" features: 

• Prints English error messages 

• The "KISS" cartridge does not 
have to be installed in order 
to input text information 

• Automatic page numbering 



• Input of text is via standard 
ATARI screen editor - so 
there is nothing new to learn 

• Only 13 commands to 
process text 

• Text can be sent to screen 
or printer 

• Single page or fan-folded 
paper can be used by 
printer 



on output 

• Text can be justified to both 
the left and right margins 

• Can be used for letters, reports, 
term papers, etc. 



JOSS^ 
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ATASCII Animation coutiuued 



days ago, I saved them on disk without the Sue. This 
is perfect, because now I can show you how to. . . 

G. Append Graphics. 

I know you don't have + Frank saved on disk, so 
you can just read this for the sake of demonstration. 
I hit G and something similar to "load screen" shows 
up. If you're unsure of what "load screen" is, review 
the L section immediately. I press RETURN, because 
I forgot what filename I used. 

Okay, there it is: ANDFRANK.LGO 024. I type 
ANDFRANK.LGO. The computer appears to be load- 
ing in the logo like nothing out of the ordinary. But, 
actually, it has taken out the clear character — it takes 
the first character from the file and just sends it to 
bit heaven. 

It has finished its job and sends me back to the 
menu, where I belong. In review, you could say that 
Append Graphics adds a logo onto the end of your 
logo from disk. 

K. 38/30 Column. 

Some people like 38-column mode, but if you're 
like me, you want those two extra spaces for your 
masterpiece. You have a choice. Just press K and 
choose. 

You may want to save your logos with an extender 
that reminds you of the column mode. For example, 
SI;ENFRNJ<C.40 or RENEE.38. A logo that was made 
in 40-column may or may not look so good in 38- 
column, and vice versa. 

If you'd like to customize your prograiu to be in 
40-column without having to press K and choose the 
mode every day when you boot ATASCII Animation, 
this is what you do: change the variable in Line 130 
to read LM=CO. That will make the left margin 
instead of 2. 

D. Delete Last Character Typed. 

This has absolutely nothing to do with 38/40 Col- 
umn. If your current work is coming out well and, 
by mistake, you press = instead of CTRL-^, you'll 
use this option. 

Actually, any time you type a character that you 
don't want during Continue Make Screen, you can 
use D on the menu to erase forever the last character 
that you typed. 

That concludes the menu options for today. Feel 
free to review any options that you don't quite un- 
derstand. 

Making large, friendly letters. 
I use ATASCII Animation a lot for making these 
letters. Once you get the hang of it, they're rather easy. 
They are mainly based upon the control characters. 



QWE R (SHIFT 
ASD 

zxc 



m 



Notice that they include every 90-degree angle and 
every straight line. With these, you can make any 
kind of square or letter. 

Now, try this: 



CTRL or SHIFT and 

QR_RE 

= = looks like 

ZRXRC 



□ 



The letter A . All of the large letters are based upon 
a square. If you want them to "connect" in the pro- 
gram listing REM statements, you may have to change 
the corner characters to look like they start the next 
letter 

It may take a bit of practice (even a byte], but it 
can be done! I always make them in inverse, so they 
stand out better 



WANT 

TO 

SUBSCRIBE? 



It's worth it. 



CALL TOLL FREE 
1-800-345-8112 

In Pennsylvania 

1-800-662-2444 
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The arrows are made with miscellaneous CTRL 
characters. 

Be creative. 

ATASCII Animation is not only for making large, 
friendly letters, but also for making just about any- 
thing you can type out with ATASCII characters. Car- 
toons can be fun. . .Just think: "The Adventures of 
AtariMan" or "Star Trek episode 83." Go wild! 

The inverse video key can be useful for some sit- 
uations, because it can change one character into a 
totally different character. Try it out. 

If you're going to be using the TAB key to get to 
the other side of the screen in a hurry, be careful of 
the SHIFT-TAB and CTRL-TAB. If you press them, 
your tabs may not go exactly where you want them. 

I have been making logos for BBSs for quite some 
time now. If you call New Jersey BBSs, you may have 
seen some of them. Hopefully, one of the ones I made 
— for the East Brunswick BBS (EBBBS) — is still up. 
It is privately owned and operated (not by me), 24 
hours a day, and its number is (201) 254-6449. Give 
it a call and leave me a message. 

I consider the error trapping in ATASCII Anima- 
tion pretty good, and you may want to do something 
similar in your programs. There is a trap statement 
that sends the program to this section just about any 
time there is an error. At the beginning of every sec- 
tion of the program, a variable called MODE$ is set 
to the name of that particular mode. 

When an error is encountered, you find out not 
only the error number, the mode it occurred in and 
the line it happened in, but also, in English, what 
the error is and if it is a common one. Take a look 
at Lines 1940-2030. 

That concludes the explanation of ATASCII Ani- 
mation. I hope you've found it both informative and 
amusing. Have fun and be creative! D 

Mark Comeau is a self-taught BASIC programmer, 
a junior high student in Piscataway, New Jersey. This 
is his third program published in ANALOG Comput- 
ing. He has also just finished putting together on Atari 
computer payroll system that can handle two hundred 
employees, for a company in Pennsylvania. 

Listing 1. 



ATASCII ANIMATION 



BY: MARK COMEAU 



le REM 

20 REN 

30 REN 

68 REN 

79 REftD C1,C2,C3,C4,C5,C6,C7,C19,C14,C 

15 , C17 , C18 , C2e , MEMU , YES 

98 GRAPHICS C8:P0KE 789,C8:P0KE 710, C8 

: BF=FRE f CO) -2088 : CN-C2 



188 DIM 0$CBF),F$CC28),HLStll8J .SPRDSC 

72) , HODE$ CIO) , PROMPTS f 100) : nOI>E5="^BB 

[IE]":TRAP 1940 

105 FOR IT=C1 TO 100: READ C:PR0MPT$CIT 

)=CHR$fC) :NEKT IT 

lie OPEN ttl,C4,Ce,"K:" 

128 SPRDS="*U":SPR0SC72)= SPRDSt3) = 

SPRD$ : SPRD$ C37 , 38) ="tt»" : SPRDS C39) =SPRD 
SC37) :AS="H":LM=C2 
148 REM 

158 REM Emm 

168 REM 

178 M0DES="'CIlini" : FOR IT=C14 TO CO STEP 

-Cl:POKE 709,IT:MEXT IT 
190 POKE 82, C2: POKE 75 2. CI 
200 ? PROMPTS C73 , 81) ; "| 
iniBnii"; PROMPTS C82, 88) 
210 POSITION C4,C1;? PROMPTS C89 , 94) ; "■ 
l;MSri1;i:^iHi;i>i!llM.'iigll5M "! PROMPTS 195) 
220 FOR IT=C8 TO C3:P0SITI0N 12,IT*C3: 
? PROMPTS CIT»C18+C1, IT»C18+C18) :NEKT I 
T:POKE 82.5:? 
280 1 
■" ;'? 



ATASCII ANIMATI 



A. CONTINUE/MAKE SCREEN 
C. CLEAR GRAPHICS 



388 ? "I 
■'■:? "I 

II 

328 ? 
■":■» ' 



5. SAVE GRAPHICS 
L. LOAD GRAPHICS 



T. TAKE PICTURE 
G. APPEND GRAPHICS 



K. 38/46 COLUMN 
D, DELETE LAST CHARACTER TVPED 



348 1 

368 POKE 82,C2:C0L0R 160:PL0T C3,C1:DR 
ONTO C3,C17:DRAHT0 38,C1? :DRAHTO 38, CI 
:? 'W 
370 FOR IT=CO TO C14:P0KE 709,IT:NEXT 

308 POSITION Ce.COi? "KIHIIIKIB" 

390 REM 
400 REM 

418 REM 

428 MODES="l3ia*4:i-J'ti" , 

430 6ET ttCl,C:G=CO:IF 0128 THEN C=C-1 

28 

THEN G=750 

THEN G=590 

THEN G=860 

THEN LFL=C0:G=1050 

THEN 



KEYBOARD INPUT 



G=1300 
THEN LFL=Cl:G=980 
THEN G=1810 
THEN 660 



448 IF C=ASC("ft") 

458 IF C=A5C<"C") 

468 IF C=flSCt"S") 

478 IF C=ASC("L") 

488 IF C=ASCt"T") 

498 IF C=ASCt"G") 

500 IF C=ASCt"K") 

510 IF C=flSCfD") 

520 IF G=CO THEN 420 

538 FOR 1=23 TO CO STEP -CI: POSITION C 

0,1:? "Glf"; :SOUND C0,RHDtC0)»C5,C14,C4 

:NE}(T I 

540 POSITION CO, CO: FOR I=CO TO 23:? "D 

";: SOUND C0,I+I,C14,C4:NEXT I: SOUND CO 

, CO, CO, CO 

550 GOTO G 

560 REM 

570 REM 

580 REM 

590 MODE S="ri 

600 ? " mv^Mill J-UH;! laimiflB" r spRit5 

610 ? :? :? "ARE YOU SURE CY/N) ";:GET 

ttCl,C:IF C=YES OR C=YES+128 THEN GOTO 

MENU 

620 AS="IS":CH=C2:G0T0 MENU 

630 REM 

640 REM 

650 REM 



CLEAR GRAPHICS 



DELETE CHARACTER 



ifi ?S^Eg=C?^^ra"THEN CN=Cl: POSIT 
ION C0,C20:? "QQD^^END OF FILE": GOTO 4 
28 
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continued 




Presents: 



The World's Greatest Printer Utility! 



MegaFontU + 

The Complete Program Lister 
and Graphics Dumper 
^ by Richard Rognlie and 

ai3 Randy Dellinger 

. dandlati proomm lister . . ." Craatlva Computing 
MORE FONTS — FASTER DUMP — FONT UPLOADER* 

Allows NEC. Prowriter, Epson (w/Graflrax, RX-80, FX-80), RIteman, Gemini, Mannes- 
mann Tally, Panasonic & other compatible dot matrix printers to dump Graphics 7+ and 
8 screens in 3 sizes (4 on Epson) and print all control and inverse characters in fonts 
provided or use your own. New Features: Adjustable margins, FAST LISTER, Font 
uploader*, adjustable line spacing. Font Splicer (combine 2 fonts together). 
•Prowriter 8510AP w/chip, Epson FX-80 & Panasonic KX-PI092 

48K disk please specify printer Only $24.15 

Chip for Prowriter $15.00 



**r 





The Ultimate Atari Database 



XLENT MeaaFiler 

by Jerry Kwit (Mode Mixer 2) 

"I don't hatlava you can gat batlar valna lor your 
monay . . ." ACE Hawslattar 

"Its claim to tama Is tha larga amounts ol 
racords It can handla." ANA106 

XLENT MegaFiler is a very powerful and easy to use database system that can handle 
over 1500 records. Allows you to define a formula, modify database records, add or 
delete fields and modify field lengths. Features Report and Label generation. New 
Features: Sort on multiple fields, create report subfile. 
■IBK disk Only $29.9S 



Our First Adventure Into Games 



Dungeons, Dragons, 
& Other Perils 

by James Hurd 

The most accurate D&D adventure for your Atari. 
Multiple levels with many rooms. Vampires, ghouls and 
monsters await you. Features Dragon's Handbook by 
Jennifer Brabson 
4BKdisk 0nly$tS.95 




Out Of The Ordinary 



Hypnosis witli 

Brainwave Synchronization 

by Gene Levine 

A powerful modern addition to the traditional hypnotic aids — from 
bright shiny objects and spinning disk, to photic stimulators. Seven 
screens to aid you. 
48K disk Only $29.95 




Add $2.00 lor shipping and handling. C.O.D. order, $2.00 fee is added. Virginia 
residents: add 4% sales tax. Send check or money order to: 

XLENT Software 

P.O. Box 5228 

Dept. B 

Springfield, Virginia 22150 

24 Hour Order Phone (703) 644-888t 

. CIRCLE #136 ON READER SERVICE CARD . 



680 POSITION Ce,C20:? " \ ► ► niWl^ITTrJ 
i^ii > ^^ f CN) 

698 FOR W=255 TO CO 5TEP -SOlSOUND CO, 
U,C14.C14:NEKT V:50UND CO, CO, CO, CO 
700 flSCCNJ="":GOTO 420 
710 REM 

720 REM EMaaEQEma 

740 REM 

750 MODESz-caaaiEaaii" 

760 POKE 752, CO:? "iS-rPOKE 82, LM:? ft$; 

:POKE 764,255 

770 P=PEEKC53279) :IF POC15 AND P<>C7 

THEN GOTO MENU 

790 IF PEEKC764J=255 THEN 770 

800 GET ttl,C:? CHR$CC); :A$CCN)=CHRS(C) 

:CN=CN+Cl:GOTO 770 

820 REM 

830 REN 

840 REM 

860 MODE $="i; 

870 ? "'|iBgn- l'J=»-"»'l?l J TMB" r ^"""^* ■ -^ 
888 ? :? "FILENflHE OR l;iiAlli;l:l FOR DISK 
DIRECTORY OR CONTROL-Q TO QUIT":? "SAV 

ll^W^l ^^-^^ F$="r" THEN GOTO MENU 

900 IF FS="'" THEN 605UB 1220: GOTO 880 

910 F=LEN tFS J : HLS=FS : FS^"" : FS tC3 , F+C3) 

=HLS:FSCC1,C2J="D:" 

920 OPEN «C2,8,C0,FS:? :? "SAUING..." 

«S ESS"^ tt2;A5;: CLOSE ttC2:G0T0 MENU 

960 REM 
970 REM 

980 MODES^'-f; 

990 ? "K Httltyj Jai;hM Ji«*^ " ; SPPPS 

1000 GOTO 1070 

1010 REM 

1020 REM 

1030 REM 

1050 MODES: 

1060 ? "iBMi- Mi't.-liJ;>JJ TQ|"-^rnr* 

1070 ? ;? "FILENAME OR l'Bil|ri:i FOR DISK 



SAVE SCREEN 



APPEND FILE 



APPEND 
■^APPEND FILE- 



LOAD SCREEN 



LOAD 
-■>LOAD SCREEN^ 



DIRECTORY OR CONTROL-0 TO OUIT":' "LO 
AD D:";:INPUT FS 
1080 IF FS="r" THEN GOTO MENU 
1090 IF FS="" THEN GOSUB 1220: GOTO 107 

1100 F=LEN tFS> : HLS=FS : FS="" : FS CC3, F+C3 

)=HLS:FS(C1,C23="D:" 

1110 OPEN ttC2,C4,C0,FS 

1120 ? "H":POKE 82, LM 

1130 IF NOT LFL THEN CN=C1:AS="" 

1140 IF LFL=C1 THEN GET »C2,C 

1150 TRAP 1170 

1160 GET ttC2,C:ASCCN]=CHRSCC) :? AS CCNJ 

; :CN=CH+l:GOTO 1160 

1170 IF PEEKC195)<>136 THEN 1940 

1188 CLOSE ttC2:G0T0 ICNU 

1190 REM 

1200 REM 

1210 REM 

1220 OPEN ttC2,Ce.Ce,"D:«.»":TRAP 1240 

1230 INPUT tlC2,FS:? FS:G0T0 1230 

1240 TRAP 1940: CLOSE ttC2: RETURN 

1250 POKE 712,C0:P0KE 752,C0:P0KE 559, 

34:BFL=C0:GOTO MENU 

1260 REM 

1270 REM 

1280 REM 

1300 HQDES:: ' ^ 

"BPlMif-aarfti'in^q]" ; sprds 

HHILE PICTURE IS BEING DISPLA 



DISK DIRECTORY 



1310 
1320 
VED : " 
1338 ? 
1340 ? 
1350 ? 



TAKE PICTURE 



TAKE PIC 
— >TAKE PICTURE* 



PRESS 
PRESS 
PRESS 



OPTION 
SELECT 
START 



TO SPEED UP" 
TO SLOW DOMN" 
TO TAKE PICTURE" 
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DISPLAY PICTURE (5L0WLY) 



1360 ? :? :? "DO YOU MftMT IT TO COME U 

P FROM THE BOTTOMCY/N) "; 

1378 INPUT FS:IF ftSCCFSJ=YE5 THEM ? "Y 

E5":BFL=Cl:G0T0 1400 

1350 ? "M0":BFL=Ce 

1400 ? :? "DO YOU MAMT IT TO TAKE LA5T 

FRAME tY/M) "," 
1410 INPUT FS:W=C10:? "H" :P05ITI0II C8, 
Ce:POKE 82,LM:IF A5C(FS)=VES THEM 1570 
1440 REM 
1450 REM 
1460 REM 

1470 TM=C10:F0R I=C1 TO LEMCA^) 
1480 ? A5tI,I) ; :P=PEEKC53279J :IF POCl 
5 AMD POC7 THEN 1526 

1500 FOR M=l TO TMlNEXT H:NEKT I: GOTO 
1560 

1520 IF P=C3 THEM TM=TM-C18:IF TM<CO T 
HEN TM=CO 

1530 IF P=C5 THEM TM=TM+C10 
1540 IF P=C6 THEM 1650 
1550 GOTO 1500 
1560 POSITION CO, 22:? "TAKE PICTURE OF 

LAST FRAME CY/M> ";: INPUT FS 
1570 IF ASCCF5)=VES THEM ? "i^":? AS; :P 
OSITIOM CI, Cl: GOTO 1650 
1580 ? "DO IT AGAINCY/N) ";:IMPUT FS 
1550 IF ASCtF$J=VES THEM 1300 
1600 GOTO MENU 
1610 REM 

1620 REM EsaaEsniiii 

1630 REM 

1650 AS="":CN=C1:P0KE 752, Cl:? "'*" 

1660 AS(CN)=CHRStl251 :CM=CM+Cl:IF BFL= 

Cl THEM ASCCN}="f":CM=CM+Cl 

1670 POKE 555,C0:F0R Y=CO TO 23 

1688 FOR PN=35 TO LM STEP -1:L0CATE PM 

,Y,C:IF C<>32 THEN 1700 

1650 NEXT PN:G0T0 1750 

1700 FOR K=LM TO PN:LOCATE X,Y,C:ASCCM 

)=CHR5tC> :CN=CN+Cl:MEXT X 

1710 POKE 712,Y/1.5 

1750 IF PM<35 AND Y<23 THEN AStCN)=CHR 

$ C155] "CM-CN+Cl 

1760 NEXT Y:P0KE 712, CO: POKE 752,C0:P0 

KE 555,34:BFL=C0:G0T0 178 

1780 REM 

1758 REM 

1888 REM 

1818 ^ "KOBIf Kf^jMhMMV lnl tlSSi" ' ^"" 

1828 MODES^" ^ 

1838 ? :? "CURRENTLY IN 

MM":? :? 

1848 ? "PRESS 1. 38 COLUMN" 

1858 ? " 2. 48 COLUMN": GET «1,C 

1878 IF C=45 OR C=177 THEM LM=C2 

1888 IF C=58 OR C=178 THEN LM=C8 

1858 GOTO MENU 

1500 REM 

1510 REM 

1520 REM 

1540 CLOSE ttC2:? :'i 

; MODE$ ; "QB9" ; SPRDS 

1550 P=PEEKC155>:? "ERROR- 

INE ";PEEKC187J»256+PEEKC186J 

1560 IF P=170 THEM ? :? "FILE NOT FOUH 



38/46 COLUMNS 



-->38/40 COLUMH<- 
38/40 COL 



140-LM;" COLU 



ERROR HANDLER 



IS-->ERR0R IN 



* " J 



AT L 



1570 IF P=C5 THEN ? :? "OUT OF MEMORY" 
1580 IF P=162 THEM ? :? "DISK FULL" 
1558 IF P=165 THEM ? :? "BAD FILE NAME 

II 

2800 ' :? "TRY AGAIN":? "PRESS ANY KEY 

FOR MENU" 
2810 TRAP 1548: GET ttCl,C:GOTO MENU 
3000 DATA 1,2,3,4,5,6,7,10,14,15,17,18 
,20,170,85 



3180 DATA 168,168,145,146,151,146,151, 

146,146,151,146,151,151,146,151,133 

3118 DATA 168,168,145,138,252,168,168, 

168,252,160,146,132,160,168,252,168 

3120 DATA 252,252,136,145,21,8,252,252 

,160,252,252,160,146,132,252,160,252 

3130 DATA 160,160,252,18,21,168,160,15 

4,152,146,152,152,146,146,152,152,146 

3140 DATA 152,146,146,131,160,160 

3200 DATA 125,32,21,21,21,21,21,21,18, 

8,21,21,21,21,21,21 

3218 DATA 145,145,145,145,145,136,138, 

145,145,145,145,145 



CHECKSUM DATA. 

fsee page 13} 

18 DATA 463,586,325,261,284,554,715,11 

8,875, 185 , 86 , 362 , 52 , 71 , 234 , 5863 

288 DATA 185,661,263,682,835,21,653,64 

5 , 277 , 655 , 185 , 425 , 83 , 658 , 181 , 6173 

448 DATA 580,583,608,456,425,266,481,6 

5,461,355,555,713,188,414,186,6452 

558 DATA 465,420,548,425,53,187,55,682 

, 268 , 218 , 781 , 888 , 85 , 73 ,58 ,5458 

758 DATA 221,418,781,563,668,54,181,10 

8 , 268 , 475 , 852 , 1 , 858 , 532 , 585 , 6553 

530 DATA 736,185,123,111,81,468,718,27 

6,433,278,155,675,344,521,627,5647 

1100 DATA 765,683,688,55,575,682,716,5 

84,284,287,713,282,435,738,55,7426 

1258 DATA 38,287,800,285,587,48,775,28 

5,154,525,148,448,224,625,531,6128 

1448 DATA 251,548,253,137,837,721,135, 

558 , 533 , 721 , 461 , 535 , 355 , 466 , 558, 8425 

1618 DATA 254,455,256,24,566,575,125,1 

77 , 54 , 453 , 325 , 855 , 384 , 581 , 255 , 6315 

1810 DATA 518,186,653,381,878,526,516, 

5 , 382 , 176 , 384 , 682 , 184 , 132 , 745 , 7264 

1588 DATA 288,711,281,467,148,734,711, 

550,755,650,834,133,6174 
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>lBBy'S CARRIES A FULL SELECTION 

OF SOFTWARE FOR YOUR ATARI. 

CALL FOR CURRENT PRICES. 



B 

aa 

H 

la 

IB 

la 
[a 

!■ 

i 



k 



ATARI 

65 XE Personal Computer $ 99 

65 XEM Personal Computer $1 29 

1 30 XE Personal Computer $199 

1 30 ST Personal Computer $399 

256 ST Personal Computer $499 

520 ST Personal Computer $599 

800 XL $ 89 

1050 $159 

1020 Printer $49 

1 025 Printer $1 70 

1030 Modem $69 

Atari Lab Starter Kit (R) $45 

Atari Lab Light Module (R) $34 

Millipede (Ri $16 

Moon Patrol (R) $16 

Track & Field (R) $25 

Family Finances $23 

Eastern Front (R) $13 

Football (R) $13 

Home Filing Manager (D) $25 

Assembler Editor (R) $27 

Atari Basic (R) $10 

Microsoft Basic II (R & D) $45 

BRODERBUND 

Print Shop $35 

Paper Refill $13 

Stealth $23 

Spelunker $23 

Whistler's Brother $23 

Bank St. Writer $44 

BATTERIES INCLUDED 

Home Pak $39 

Paperclip $69 

B/Graph $59 

80-Column Card $1 29 

SSI 

Field of Fire $31 

Operation Market Garden $39 

Kampfgruppe $49 

Computer Ambush $49 

Knights of Desert $35 

Rails West $35 

War in Russia $49 

Computer Baseball $31 

Questron $31 

Carrier Force $49 

Broadsides $31 

EPYX 

Rescue on Fractulus $27 

Ball Blazer $27 



SOFTWARE HITS 

Ghostbusters $26 

Spy V Spy $26 

Bruce Lee $26 

Dallas Quest $24 

PQ Party Quiz $39 

Fancy Fonts $25 

Flight Simulator II $39 

Gyruss $39 

I Love My Atariwriler 

Printer Driver $29 

Trivia Quest $34 

Bank St. Musicwriter $39 

Bounty Bob Strikes Back $39 

Beachhead $26 

Home Accountant $55 

Codewriter $69 

Adventure Writer $35 

Major League Baseball $31 

Team Disk (for above) $15 



AMERICAN EDUCATIONAL 

ALL TITLES $17 

INFOCOM 

Zork I, II, III ea. $29 

Hitchhiker's Guide $34 

Suspect $34 

Cutthroats $34 

Deadline S34 

Witness $29 

Starcross $34 

Infidel $31 

Seastalker $29 

Invisiclue Books $ 7 

Sorcerer $31 

CBS 

Success With Math Series 

All Titles $19 

Big Bird (R) $19 

Ernie (R) $19 



ABBY'S SPECIAL BUYS 



Atariwriter (R) $35 

Visicalc (D) $40 

Synfile (D) $40 

Syncalc (D) $40 

Syntrend (D) $40 

Arcade Champ (R) $21 

IPac-Man, Qix & 2 Joysticks) 



Basic Tutor Kit (C) $24 

(5 Tapes - 3 Books) 

Bookkeeper Kit (D) $99 

All Fisher Price Titles (R) . . ea. $15 

All Spinnaker Titles (R) ea. $19 

Pitstop II (R) $19 

Pac-Man (R) $ 9 

Star Raiders (R) $ 9 



ICD 

Us Doubler $59 

(Makes 1 050-1 80K) 
3 Times Faster, True Double Density 

ELECTRONIC ARTS 

One On One $29 

Music Cont. Set $29 

Pinball Cont. Set $29 

Murder/Zinderneuf $29 

Financial Cookt:)ook $39 

Archon $29 

Archon II $29 

Realm of Impossibility $29 

MICROPROSE 

Crusade $31 

Decision in the Desert $31 

F-15 Strike Eagle $27 

Hell Cat Ace $24 

Kennedy Approach $27 

Mig Alley Ace $27 

Solo Flight $27 

NATO Commander $27 



HARDWARE & ACCESSORIES 

Indus GT $239 

All Epson Printers 

Starting as low as $239 

All Star Micronic Printers 

Starting as low as $239 

Bulk Dennison or Nashua Disks, 

SSDD, 100 or More each $1 

Okimate 10 $199 

(With Interface Included) 

Ribbons for Okimate 10 $6 

1000 E MPP Modem $119 

MPP 1150 Printer Interface $69 

Light Pen $34 

Disk Notcher $ 5 

Covers - All Types For Printers 

And Computers from $7 

Ape Face $69 

Microstuff 64K 

Printer Buffer $129 

Koala Pad $59 

INNOVATIVE CONCEPTS 

Data Case (Holds 50) $11 

Flip & File II (Lock 25) $15 



Customer Service 

1-513-879-9699 



AD #AL-65 



ALL TITLES ON DISK UNLESS MARKED (R) FOR ROM CARTRIDGE 
Order Line Customer S 

1-800-282-0333 i ciq ma 

ORDERS ONLY. Sales Personnel Do ^'^ ^^ ^-^-^ P"^'. Sat. 10-3 ET 1-513-879- 

Prevll S:deM":rp";odCc.°s"pecs. ^7 S. Broad Street, Fairborn, OH 45324 

Prepaid orders over $50 receive free shipping, UPS, continental US. No waiting period when paid by credit card 



Minimum for VISA/MC. Hardware requires additional freight charges. Ohio residents add 5.5% sales tax. All items 
subiect to availability and price change. 

PLEASE CITE AD NUMBER WHEN ORDERING. 
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ASK MR. FORTH 

continued from page 24 



dent; to make it work on the Atari requires numer- 
ous changes — more than space allows. 

The calendar program will work on the Atari al- 
most as presented in the book, with the following 
minor exceptions. 

All variables should be defined as VARIABLE in- 
stead of VARIABLE. 

There is a typographical error in his definition of 
JANlST, which returns the day of the week for the 
first of January in any given year. The error occurs 
on page 107 (Line 12 of Screen 100] where the se- 
quence 2 B @ * - should read 2A@ * - instead. The 
previous description that appears on page 104, how- 
ever, is correct. 

You will need to change CREATE DPMTABLE 31 
C, (Screen 102 on page 108) to VARIABLE - 2 AL- 
LOT 31 C, because of the differences between CRE- 
ATE in the two versions of FORTH. 

Winfield uses an error message followed by the 
word ABORT in two places (Screen 102, Line 15 and 
Screen 105, Line 4), which you may want to change 
to QUIT. The word ABORT is the FORTH word for 
a warm start (in contrast to COLD in fig-FORTH for 
a cold start, which resets the dictionary pointer), 
which resets the data and return stack pointers and 
prints the fig-FORTH message. QUIT, on the other 
hand , merely brings you back to the text interpreter. 
QUIT is the endless loop which keeps invoking IN- 
TERPRET (the text or outer interpreter) and is the 
real operating system in FORTH. 

Throughout the book, Winfield uses lower case let- 
ters to define new words and follows this practice 
in his concluding examples. This distinction makes 
it easy for the reader to differentiate his additions 
from the FORTH standard vocabulary. Lower case for 
new words will work in FORTH just as well as up- 
per case, but the two are not interchangeable. Your 
FORTH will not recognize a name defined in lower 
case if you happen to type it in lower case. If you 
think this will impose an added mental bm-den, you 
may want to stick to upper case throughout. 

The calendar program will give the day of the week 
for any date, or print a monthly or yearly calendar. 

Here are answers to some of the questions your stu- 
dents are likely to ask: 

What is the difference between fig-FORTH and 
FORTH-79? 

Always remember that FORTH-79 is a subset of fig- 
FORTH, inasmuch as fig-FORTH includes nearly 300 
core words, but FORTH-79 only has 121. "This does 
not mean that FORTH-79 is less useful or powerful 
than fig-FORTH," according to C. Kevin McCabe 



(Forth Fundamentals] in his new book. 

"It is mainly a difference in philosophy. Fig-FORTH 
includes many words for stack initialization, text 
parsing and other system functions. FORTH-79 does 
not include many system-level words, since there is 
little need for words to alter the text interpreter or 
change the maimer of stack initialization. As a re- 
sult, FORTH-79 is easier for a novice or end-user to 
comprehend, but less useful for system-level pro- 
granraiing. . . 

"Fig-FORTH does not restrict user access to any 
part of the dictionary. All fields may be inspected 
and (with necessary precautions) may be changed 
at will. FORTH-79 applications that access the dic- 
tionary are allowed to address only the parameter 
fields of variables, constants, and words compiled by 
user-created defining words, and dictionary space 
that has been left by ALLOT; all other parameter 
fields, and the name, code, and link fields of all 
words, must not be accessed . . . 

[continued on next page] 



GREAT ATARI BOOKS 

This Month's Special Other Great Books 



I , tMU ■ " 



'rl. 




List 
$21.95 

Special 
$18.95 



Sams 496 pages &> 1935 

Jusl the two t)ig cliaplers on graptiics pro- 
gramming make Itiis a real goldmine lor 
ATARI 400/800, 600 XL, 1200 XL and 
800 XL owners and programmers, but 
there's also coverage of ATARI BASIC nota- 
tion, rules, and limitations; malti opera- 
tions; I/O; sound; screen display; the 
memory map: the 6502 instruction set and 
more. Eight appendices include number 
base conversions, ATARI BASIC reserved 
words and tokens, characters and 
keyboard codes, screen RAIVI address 
ranges, error and status codes, and hard- 
ware details lor the 400 and 800, 



Advanced Atari Basic 
•Inside DOS 
•Atari Assembler 

Assembly Lang, Atari 
•Mapping Atari 
Third Book (Compuior) 
' Game Design (Crawlord) 
•ComputerAnimation 
ZAP: Rise & Fall 
Fire in the Valley 
Atari Color Graphics 
•InlorwDrld's Essential Guide 
Atari Logo Book 
•Atari User's Encyclopedia 
•Your Atari Computer 
Easy Guide 600XL/800XL 
•Book Atari Software 1985 
Atari Basic Tutorial 
Excel on 600XL(l^cGraw) 
•Atari Graphk:s + Game Design 
Atari Basic Programs in Min. 
Free Software (or Atari 
Software Author'sGuide 
The Musical Alari 
Basic on Atari lor Kids 
* Book of Adventure Games 
•Atari Basic (Wiley) 
•Kids and the Atari 
Bank Street Writer Book 
Visicalc Book 



J11.95 

$19,95 
$12,95 
$15.95 
$14 95 
$12.95 
$14.95 
$22,95 
$14,95 
$ 9.95 
$12.95 
$16.95 
$12.45 
$19.95 
$17.95 
$ 9.95 
$19.95 
$12.95 
$ 9.95 
$12.95 
$12-95 
$ 8.95 
$1995 
$14.95 
$12.95 
$19.95 
$12.95 
$19.95 
$14,95 
$14.95 



Or Write: 



Order Today: 1 (800) 821-5226 Ext, 500 

24 hrs, a day, 7 days a week 



WITT'S END 

42 Morehouse Rd. 
Easton.CT 06612 



^^^^w I yfSA 



Free and Fast UPS stiipping. Add $3, for C.O.D. APO's FPOs o.k. Add $5 (or foreign shipping. We accept 
Visa/Mastercard. Personal Check, Certified Check or Money Order, "s Indkate excellent txxjks! 
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ASK MR. FORTH continued 



"In general, many of the 'bare bones' of FORTH, 
such as stack pointer values and initializers, are hid- 
den and inaccessible to the user of FORTH-79. The 
philosophy of FORTH-79 is to provide all necessary 
high level operations, such as DEPTH, but not some 
of the more fundamental operations used primarily 
to construct the equivalent fig-FORTH operations, this 
makes FORTH-79 less complex and more oriented 
to the novice programmer or end-user, while fig- 
FORTH is more useful to the experienced or system- 
level programmer." 

Where can we find detailed instructions to convert 
a fig-FORTH system to the FORTH-79 standard? 

A 22-page booklet FORTH-79 Standard Conversion 
($10.00 from Mountain View Press, P. O. Box 4656, 
Mountain View, CA 94040] has complete colon defi- 
nitions and assembler code listings for several types 
of computers. 

Why was this hook chosen instead of Starting Forth 
by Leo Brodie? 

Brodie's book is oriented toward polyFORTH which 
(1) is intended for professionals, and (2) features mul- 
titasking and multiprocessing, which do not exist on 
FORTHs for the Atari (because they are specifically 
designed for weekend hackers like you and me). The 
differences between fig-FORTH and FORTH-79 can 
be covered in a few pages, as you have seen; the poly- 
FORTH differences would require almost a whole 
book. 

What has been covered in this lecture? 

Winfield's book is complete only in the limited 
sense that he covers the complete FORTH-79 stan- 
dard vocabulary, but omits the extension double num- 
ber word set. Winfield actually covers the basics of 
the program development layer. 

What has not been covered? 

Winfield omits the other three FORTH layers such 
as applications, the operating system and the assem- 
bler, as well as floating point routines for program 
development. 

What is the vocabulary of the extension double 
number word set? 

It consists of: D- D0= D= DMAXDMINDU< 
2CONSTANT 2VARIABLE D. D.R 2! 2@ 2DROP 
2DUP 20VER 2ROT and 2SWAP. 

What is the difference between FORTH-79 and the 
new FORTH-83 standard? 

Eleven words have been renamed or removed, and 
twenty new words have been added. McCabe's arti- 
cle in the August, 1984 Byte has the details (but no 
fig-FORTH colon definitions). 



What have we accomplished today? 

We now have the best of three worlds: system-level 
fig-FORTH, plus the popular contemporary FORTH- 
79, plus access to Atari's arcade-type graphics. 

Where can we go from here? 

A 250-page book by Leo Scanlon on Forth Pro- 
gramming covers FORTH-79 in greater detail and in- 
cludes the double number word set, with their colon 
definitions as well as several applications, such as 
use of sines and cosines, bubble and insertion sorts, 
and how to create a list of phone numbers. 

Is it all right to reproduce the detachable FORTH- 
79 handy reference card? 

Forth Interest Group publications have been placed 
in the public domain to insure the widest possible 
dissemination of the language, and may be freely re- 
produced. 

How did you prepare for this lecture? 

On a blank disk , I copied the two screens of error 
messages for my fig-FORTH. Then I copied all the 
statements from the book, chapter by chapter, with 
the necessary additions to convert fig-FORTH to 
FORTH-79. Each screen ended with ;S so they could 
be loaded one at a time. My friendly assistant here 
at the console called up the screens on request, and 
I just followed Alan Winfield's well-written script, 
page by page. D 

Donald Forbes, Chartered Financial Analyst, is a 
computer systems analyst with a leading worldwide 
bank. He has been involved with large mainframes 
since 1958. His current interest is converting IBM, 
Wang and Atari microcomputers into FORTH virtu- 
al machines. As a hobby, he's writing a book on the 
mathematics of mathematics. He lives in New Jersey 
with his wife Judy and their children. 



Send your letters to: 

ASK 
MR. FORTH 

PO. Box 23 
Worcester, MA 01603 
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THE CREATION 



NEW BREED 




The G€P Network: More Commanications, 
More Graphics, LESS Hassle! 



The entry to 
worlds of adventure 
and challenge. 



liTaffrnTTiliinTiTi 



Choose your 
favorite and match 
wits with others. 



Explore and conquer 
your way to 
galactic supremacy. 





FEATURES: Joystick-driven; no commands to learn! Private maU, bulletin boards, program library, file 
transfers, automatic logons. User Group support, local phone call access from most cities, no network 
surcharge. SYSTEM REQUIREMENTS: 48K Atari, 1 disk drive, modem. 

For more information contact: 

GAMES 
COMPUTERS 




PLAY. INC. c 

112 East Market Street, York, PA 17401/717-848-2660 
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READER SERVICE # 



ADVERTISER 



137 Abby's Discount Software 88 

121 Active Software 48 

116 Advanced Interface Devices 23 

114 Allen Macroware 12 

110 Alpha Systems 14 

111 American TV 15 

— ANALOG Publishing 2, 52, IBC 

109 Astra Systems 12 

— Batteries Included OBC 

105 Bytes & Pieces 8 

117 C.A.P Software 24 

124 Centurian Enterprises 55 

119 Computability 35 

131 Computer Creations 70 

141 Computer Games Plus 92 

133 Computer Palace/Royal Software 79 

104 Computers Made Simple 7 

129 Computer Software Services 66 

135 Eastern House 83 

125 Elite Software 55 

139 Games Computers Play 91 

120 GTA, Inc 38 



READER SERVICE # 



ADVERTISER 



108 Happy Computers/San Jose Computers 9 

101 Infocom IPC 

132 Jesse Jones 77 

127 Kyan Software 56 

134 Lotsa Bytes 82 

118 Lyco Computers 26 

122 Misty Mountain Software 40 

142 MPS 92 

145 New Horizons Software 8 

102 O.S.S 5 

106 Programmers Worl<shop 8 

123 Protecto 46, 47 48, 49 

113 RAK 18 

107 Rocky Mountain Atari Service 8 

— Senecom 22 

140 Southern Software 92 

126 Tiny Tel< 55 

103 Turbo-4th 7 

128 Wedgwood Rentals 61 

130 Whitehouse Computers 69 

138 Witt's End 89 

136 Xlent Software 86 



This index is an additional service. VVliiJe every effort is made to provide a complete and accurate listing, tiie publisher cannot be responsible for inadvertent errors. 



ATTENTION ATARI DISK 
DRIVE OWNERS 

Back up your 
valuable software. 

THE CHIP 

THE CHIP with Archiver/Edilor Software for tfie Atari 
810 and 1050 disc drives. Includes Disassembler & 
Sector Editor. Includes Custom Formatter and t^^ap- 
per. Backs up virtually any disk. 

$129.95 POST PAID 

Available soon lor 

other Atari compatible disc drives. 

HAPPY 810 ENHANCEMENT 

Complete with Warp Speed software package. Plug-in 

installation — no soldering. Backs up any disc. 

Regular Price $249.95 

LIMITED SPECIAL OFFER S199.95 

Soon available tor other disc drives. 

HAPPY OWNERS 

Update your enhancement with Happy Version Arch- 
iver/Editor. Makes Happy drives compatible with the 
chip. 

$39.95 POST PAID 

AU softwars tor t/is Atari DISCOUNTED 30H or MORE. 

Dlicountt on all Alarl compatible hardware. 

Send for free brochure on any of the above or for details on our 

software discounts. 



SOUTHERN SOFTWARE 

A DIVISION OF SOUTHERN SUPPLY COIulPANY 
1879 RUFFNER ROAD BIRMINGHAM, AL 35210 

24 HOUR PHONE 205-956-0986 
Order before 1 7 A.M. for same day shipping. 
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INDUS GT 

Guaranteed lowest Price 

CALL 



MPP MICROPRINT $49.95 

UPRINTA16(inc16K BUFFER). .$79.95 

BASIC XL $49.95 

THE WRITER'S TOOL $69.95 

SYNFILE or SYNCALC $39.95 

PAPERCLIP $57.95 

PRINT SHOP $34.95 

BOULDER DASH $19.95 

WAR IN RUSSIA $51.95 

BOUNTY BOB STRIKES BACK. . . $29.95 

CRUSADE IN EUROPE $29.95 

DECISION IN THE DESERT $29.95 

F-15 STRIKE EAGLE $22.95 

ULTIMA III $37.95 

ULTIMA IV (advance order). . . .$39.95 

RETURN OF HERACLES $24.95 

UNIVERSE $69.95 

SEVEN CITIES OF COLD $29.95 

WOMBATS I (parody adventure) . $22.95 
HITCHHIKERS or CUTTHROATS $24.95 
BOOK OF ADVENTURE GAMES. $17.95 

ULTIMA III HINT BOOK $12.95 

UNIVERSE PRODUCT GUIDE. . . $12.95 

Please add S2.50 shipping (S1.50 outside USA) 
California residents add 6%. 



COMPUTER GAMES + 

BOX 6144 

GRANGE CA 92667 

(714) 639^189 
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BREAKS? 

Fast, Reliable Repair 

for Atari 810 & 1050 

Disk Drives 



■ 3 Day Turnaround 

■ 90 Day Warranty 

■ $85 Flat Rate with 
Repairable Exchange 

■ Spare Parts Available 

Dealers — Special Rates Available 
Ask about Express Expedite 

Add $10 shipping & handling. 
Check, MO, Visa, MC 

MPS 

The Disk Drive Specialists 

(916) 786-6550 



Call 8:00-5:00 Pacific Time 
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BACK ISSUES 




ISSUE 18 • Crash Dive • File'em 

• Munch'in Climb'in • H:BUG • 

Adventure Reviews 




ISSUE 19 • Battle in the B-Ring • 
A Look at Modems • Bulletin 
Board Systems • Siege • Touch- 
Tone" Dialer 




ISSUE 20 • Buzz-zap! • Scredit • 
AlterDOS • Bacterion! • ConTEXT 



ClIVCiUOEl 

^^■HICOMPtJTING^^^^ 

ATARI PRINTER 
UTILITIES! 




ISSUE 21 • Selecting your Perfect 

Printer • Matt* Edit • Graph E's 

• Spy Plane • Printer Survey 




^liic-atloii 
aiul tbi' Atari 

ISSUE 22 • Typing Evaluator • 

Math Attack • Micro-Puzzler 

• Air Attack • Mathman • 

The Reading Program 




ISSUE 23 • Fire Bug • Minicomp 

• Dark Horse • Climber • 

P/M Creator/Animator 




:^^^ BOFFO! 

Unlcheck 

— Bopolron! 

Race in Space 
AtariCon Report 
Circuit Database 



^^__ _ -- -iCassette Conipre; 

ISSUE 24 • Circuit Database • 

Bopotron! • XL-DOS 

• Cassette Compressor • 

Race in Space • Unicheck 



^^^COIVIPUTINa^^HB^ 



ATARI 







W 



ISSUE 25 • Weather Forecaster • 

Androton • Miner Jack • BASIC 

Tutorial Part 1 • Adding 

BASIC Function Keys 



)^ 




ISSUE 26 • BASIC Tutorial Part 2 • 

Robot Raid • Graphics Overlay 

• Popcorn • Magic Palette • 

PuLse in Action! 




ISSUE 27 • English Error Messages 
in BASIC •Instant Renumber • 
MicroCheck Part 1 • Adventure 
at Vandenberg • Screenmaker 




ISSUE 28 • MicroCheck Part 2 • 
TwoGun • Cascade • Monthly 
Mortgage Calculator • Demon 
Birds • MicroDOS XL 




ISSUE 29 • RAMCHECK • Revive 

Dragonlord • XL Expansion 

Connector • Cheep Talk 



All back issues $4.00 each 



Send check or money order to: 
ANALOG Computing Bacl< Issues 
P.O. Box 615, Holmes, PA 19043 



MasterCard and VISA orders call: 

1-800-345-8112 

in PA. 1-800-662-2444 



WHEN BATTERIES INCLUDED SET OUT TO 

DESIGN THE VERY BEST WORD PROCESSOR 

FOR AIARf COMPUTERS. . . 

THEY FOUND THEY ALREADY HAD IT 
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Few word processors have allowed Atari users to tap the full resources of their computer until Atari Paper Clip. . . 

Atari Paper Clip is an extremely powerful, fully featured word processor that will allow your Atari 
to operate to the limits of its potential, with an ease of operation and speed you've never thought possible. 

PAPERCLIP FOR ATARI®AND COMMODORE^OWNERS 
WHO WANT THE VERY BEST IN WORD PROCESSING. 
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30 Mural street 
Richmond Hill, Ontario 
L^BIBS CANADA 
14161881-9941 
Tfe/ex; 06-21-8290 



X 




INCLUDED 



\ 



'The Energized Software Company!' 
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WRITE TO US FOR FULL COLOUR CATALOGUE Of our products for COMMODORE, ATARI, APPLE and IBM SYSTEMS 
FORTECHNICALSUPPORTOR PROUUI.T INFORMATION PLEASE PH0NE(416I 881-9816 



1 7875 Sky Park North, Suite P 

Irving, California 

USA 92714 

(4161881-9816 



Telex: 509-139 



C 1985 BATTERIES INCLUDED. APPLE, ATARI, COMMODORE AND IBM ARE REGISTERED TRADEMARKS RESPECTIVELY OF APPLE COMPUTERS INC.. ATARI INC., COMMODORE 

BUSINESS MACHINES INC.. AND IBM BUSINESS MACHINES INC. 



